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PREFACE 


This manual presents the JCL statements and Data Services Language 
(DSL) associated with the sort/merge facilities of GCOS Level 64. 
Unless otherwise stated, the term "GCOS" as used in this manual 
refers to the General Comprehensive Operating Supervisor (GCOS) 
Level 64 software system. 


Section I gives an overview of the sort/merge capabilities and an 
indication of the ways in which the command language can be used. 
The manual's subsequent organization represents the two levels of 
user interaction with these facilities. Section II presents the 
interaction at the JCL level. Here, resources are described and 
basic processing options selected. Sections III and IV present 
the DSL statements submitted as a COMFILE within the job descrip- 
tion. These commands specify record-level functions based on the 
format and content of the user's files. 


Appendices provide reference information. Appendix A provides a 
description of the sort work files. Appendix B describes the 
contents of the sort report provided for each sort run, Appendix C 

is a list of error messages, Appendix D describes the use of 
SSORTWORK and Appendix E lists the various collating sequences which 
are available. Appendix F gives guidelines for improving performance, 
Appendix G deals with the sorting of card files and subfiles, 
Appendix H describes the special characteristics of sorting large 
records, and Appendix I deals with the Checkpoint/Restart facility 

in sort. 


Each section of this document is structured according to the heading 
hierarchy shown below. Each heading indicates the relative level of 
the text which follows it. 


Level Heading Format 
1 (highest) ALL CAPITAL LETTERS, UNDERLINED 
2 Initial Capital Letters, Underlined 
3 ALL CAPITAL LETTERS, NOT UNDERLINED 
4 Initial Capital Letters, Not Underlined 
5 (lowest) ALL CAPITAL LETTERS FOLLOWED BY COLON: Text 


begins on same line. 
The following notation conventions are used in this manual: 
UPPERCASE The keyword item is coded exactly as shown. 


lowercase Indicates a user-supplied parameter value. 


[item ] An item within square bracket is optional. 


item2 one value must be selected if the associated 

item3 parameter is specified. If the parameter is 
not specified the underlined item is taken as 
the default value. 


{icon A column of items within braces means that 


( ) Parentheses must be coded if they enclose more 
than one item. 


eer An ellipsis indicates that the preceding item 
may be repeated one or more times. 


Note: All references to divice class MSU0350 in this manual include 
MSU0350 and MSU0351. Similarly, all references to MSU0400 
include MSU0400, MSU0401, MSU0402 and MSU0452. 
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SECTION I 
SORT AND MERGE FACILITIES 


This manual describes the sort and merge utilities available to a 
user operating under GCOS. The design of these utilities 
incorporates facilities to minimize the task of job description and 
optimize the efficiency and flexibility of the sort or merge 
processes. The variety of optional parameters permit.a user to 
tailor the sort or merge process to the requirements of the 
application. 


The control language used to describe a sort or merge consists of 
Job Control Language (JCL) statements which describe the user’s 
files and operating environment and a set of commands written in the 


Data Services Language (DSL) that describe functions based on fields 
within the User’s input records. 


SORT/MERGE CAPABILITIES 
The sort capabilities documented here include the following 
features’ 

- Four output record formats 

- Specification of up to 64 key fields per sort 


- Summation of values in up to 16 fields of identically keyed 
records 


» Presort record selection based on data values in the input 
record (up to 16 conditions can be specified). 


- Field level record restructuring (up to 128 fields can be 
speci fied) 


- Use of disk or tape for work files 


- Use of EBCDIC, Series 100, ASCII or Series 200/2000 Collating 
sequence, or a privately defined collating sequence 


« Sorting only part of a file 


- Checkpoint/Restart facilities 
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a » File concatenation on input (up to 9 files) 


The merye capabilities documented here include the follewing 
features: 


- Meryiny of up to eight input files 
. Specification of up to 64 key fields per merge 


- Summation of values in up to 16 fields of identically keyed 
records 


- Premerge record selection based on input data values (up to 16 
conditions can be specified) 


- Field level record restructuring (up to 128 fields can he 
speci fied) 


E - Use of EBCDIC, Series 100, ASCII or Series 200/2000 collating 
sequence or a privately defined collating sequence 


SORT/MERGE JCL STATEMENTS 


Both the sort and merge processes are activated as job steps through 
extended JCL statements’ the respective statements begin with $SSORT 
and SMERGE. A Sequence of parameters is associated with each of 
these statements. These are described in detail in Section II. 
Generally, these parameters specify files involved (input, outonut, 
work), describe the location of the Data Services Language 
statements, and select general job control processing options. 


THE DATA SERVICES LANGUAGE (DSL) 


The record level command file, written in DSL, must be provided as 
an inout enclosure or as a previously established member of a source 
library. Statements in this file are described in Section III for 
the sort utility and Section IV for the merge utility. All but one 
of these statements are optional. The mandatory statement, KEYS, 
establishes the key fields for tne sort or merge process. 


Tne keys consist of one or more fields in the input record. For 
example, if the records are to be sorted according to an emp lovee 
code contained in the first four bytes of the record and, within 
that sequence, according tn the employee’s age (contained in bvtes & 
and 9), the user would establisn a key comnosed of bytes 1! through 4 
as the major key, and bytes 8 and Y as the minor key. Ihe sort 
utility would sort the input into sequence of the employee code and 
within a given value of the employee code in the sequence according 
to ayee Likewise, the merye utility would use the major key 
(employee code) to merge records. ihen equality is reached on the 
major Key then the records are neryed in Sequence according to the 
minor key (age). 
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SORT WORK FILE SPACE 


The sort utility requires work file space in order to produce sorted 
output. This may be on either tape or disk . For a given sort, all 
work space must be on the same device class. 


A disk work file may be permanent or temporary. In either case, if 
the work file is supported by more that one volume, the appropriate 
devices must all nave the same attributes. 


When magnetic tape work files are used, the tape volumes must have 
been prenared using the utility SVOLWORK. It is not necessary for 
the device attribute "density" to be the same for all tapes. The 
work tapes’ capacity must be greater than the total input file size. 


If no work space is explicitly requested then the sort utility will 
use a temporary file on the system disk (10 cylinders). 


USING SORT wITH COBOL 


In the COBOL language the programmer may invoke the sort utility in 
a dynamic manner, through the SORT verb. In this case, the key 
fields, input and output files, and other control information is 
supplied inside the invoking COBOL program. However, the user must 
supply information on the sort work snace in the job step 
description of the executing program. The extended JCL statement 
SSORTWORK is used. For further details see Appendix D. 


USING SORT WITH HFAS (Series 200/0) 


Both Sort and Merge can be applied to Series 200/0 files. This 
manual deals mainly with the use of the utilities on BFAS files. For 
further details on processing Series 200/0 files see the publication 
"HFAS User Guide". The description in this manual on work space 
definition and DSL use apply also in the HFAS case. 
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SECTION II 
SORT/MERGE JOB DESCRIPTION STATEMENTS 


The JCL statements for sorting and merging files are constructed as 
in Figure 2-1. As this Figure snows, each utility requires the 
input, output, and command files to be specified. All other elements 
of the JCL statements are optional. Default values exist for the 
parameters, which, if they are appropriate to the application, allow 
the specification of the parameter to be omitted. These other 
elements relate to work files (sort only), reporting, performance 
optimization, error record processing, part-file processing, 
checkpointing, and abnormal termination. The various parameters are 
discussed on the following pages. 


~y Work -| REPORTS, 
DSL files 


CHECK-— 
COMMAND POINT, 


Perform— 
ance, 
Part—file 


(ULE 


ABNORMAL 
END. 


MANDATORY OPTIONAL 


Figure 2-1. Construction of Sort and Merge JCL Statements. 


Notes relating to SORT. 


1. Input and output files may be BFAS, HFAS, or UFAS FE 
independently of each otner. 


2. Input and output files may be on disk or tape independently 
(i.e., input disk file may produce output disk or tape file, 
and input tape file may produce output disk or tape file.) 


3. Similarly, input and output files may be temporary or 
permanent independently. 


The output may be written onto the input file 
(OQUTFILE=CINFILE)). 


Options are available to reduce the device requirements of a 
sort. 


- a Single device can be reserved for the input file and the 
output file, provided, of course, the volumes supporting 
them are of the same device class (REPLIN). 


- for a tape sort, the same device can be used successively 
to process the input file, a work file and the output file, 
provided again that the volumes supported all belong to the 
same device class. 


These options, however, save drive reservation at the cost of 
increasing elapsed time, due to volume mounting and 
dismounting during the sort. 


Output records are padded or truncated depending on the size 
of the output record compared with the input (or arranged) 
record, 


Tape Sort (work media is tape) t Unless USEQUT is specified 
(work tape subsequently used as output tape volume) it is 
assumed that all the tape volumes to be used in the sorting 
process have a work status, that is, have been obtained by 
using the SVOLWORK utility. The number of devices required to 
support work files for the sort must be speci fied through 
NBDV. . 

NWhen REPLIN, REPLOUT, or USEOUT is specified (see below), all 
the volumes involved should have the same device 
characteristics, including density. 


8. Disk Sort (work media is Jisk) * If WKDISK is specified with 


9. 


the SIZE parameter option, a temporary file, named SORTWORK, 
is allocated. 


It neitner WKTAPE nor WKDISK is specified, the sort uses a 


temporary work file of ten cylinders on the resident disk. 
lhe temporary file is allocated under the name SORTWORK. 


Notes Relating to MERGE. 


l. 


The file specified as INFILE! is known as the primary file. 
Other input files, INFILE2 through INFILE8 must have the same 
record size and format as the primary file. 


Input and output files may be BFAS, HFAS or UFAS 
independently of each other. 


Any combination of BFAS, HFAS and UFAS files may be merged. 


Format of SSORT Statement 


Below is the generalized format of the SSORT JCL statement. 
Lower-case elements are expanded later in this section. 


SSORT INFILE = (file) 


{,INFILE! = (file) 
{,INFILE2? = ( file) 
{(,INFILE3 = (file) 
{(,INFILE4 = (file) 
{(,INFILE5 = (file) 
(,INFILE6 = (file) 
{,INFILE7 = (file) 
(, INFILE8 = (file) J]}]}J]1]))] 
,OUTFILE = None 
CINFILE) 
ee enclosure name} 
eCOMFILE = (file) 


[ pele = (tape work file | 
WKDISK(S] = (disk work file (s)) 


» REPORT = {| AUDIT 
PARAM 


[, PRTFILE = file] 
[, SIZE = nnnn] 


» INVREC = (f{ fae id 


CONTINUE 
PRINTID 
| ERROPT = PRINT 
LOG 
IGNORE 


[, LOGFILE = (file)] 
[, START = nnnnnnnnnn] 
[, HALT = nannnnnnnn] 


[, REPEAT] 


, DUMP = JNO 
DATA ; 


Format of SMERGE Statement 


Below is the generalized format of the SMERGE JCL Statement. 
Lower~case elements are expanded later in this section. 


SMERGE INFILE] (file), INFILE2 = (file) 


[,INFILE3 = (file) [INFILE4 = (file) 
[,INFILE5 = (fide) f,INFILE6 = (file) 
[,INFILE7 = (file) [,INFILE8 = (file)}]]J]] 


,OUTFILE = (file) 


*input enclosure name 
»COMFILE = (( file) 


| AUDIT 
»sREPORT = \PARAM 
ALL 
NONE 
[,PRTFILE = (file)] 


[, BUFFER = nnn] 
,DUMP = (No | 
DATA ; 


Specifying files in S$SORT and SMERGE 
The files specified in the S$SORT and $MERGE JCL statements have many 
common elements, as illustrated by Figure 2-2. 
Use Figure 2-2 to specify files as follows: 
INFILE Boxes 1,2 and 4 apply. 
INFILEn If SMERGE boxes |, 2 and 4 apply. 
If $SORT box | applies. 
QUTFILE Boxes |,2,3,4,5 apply. 
PRIFILE Boxes 1! and 3 apply. 
LOGFILE Boxes 1,2 and 3 apply. 
COMFILE Box |! applies. (Note that SUBFILE parameter is mandatory) 


external-file-name 
CAT | 
»FILESTAT = UNCAT 
TEMPRY 
IN 
{,CATALOG = nj 


(NORMAL 
[, SHARE = §ONEERITE 2] 
UT i 


DEASSIGN 
»END = 5PASS 
UNLOAD BOX 1 
{,FSN = nnn]j 
DEASSIGN 
{, ABEND = {PASS J 
UNLOAD 


[,SUBFILE = member-name] 


» LABEL NATIVE 
H2 OU 
H200E80 
H2 OOC&O 
H200C1 20 
NONE 

H2 OONONE 


[» MOUNT 


nn] 


C(,FIRSTVOL = nn) 
(,LASTVOL = nn] 


RESIDENT 4 
‘ DEVCLASS = device-class-name { ,MEDIA = ¢ SWORK >] 
(media-name [,...] 


Figure 2-2. File Specification in $SORT and SMERGE 


P FILEFORM 


{, WRCHECK J] 


(,ADDRFORM = JITRDD( } 
LKRR 


RETCODE 
C,ERROPT = JSKIP () BOX 2 
ABORT Sot ee ee 
IGNORE 
RECSIZE = nnnnn 
"} ITEMSIZE = nnannn 


[,BLKSIZE = nnnnn ] 


EB 


eRECFORM = [, N&SN } 


o 


w] 


IC 

TD 

TE 
FORMAT] 
FORMAT2 
FORMAT3 


F 
V 

V 

9) 

TA BAN 

H2Q0FORM =| [B ]hBancuar = “ist [. PancHAR 
FORMAT4 


[) SIZE = nnn] : DATABUF 


BOX 3 


[,BPB 


[, REPLIN] BOX 5 


Fiyure 2-2. File Snecification in S$SORKT and SMERGE (Cont.) 


[,EXPDAIE = expiration-date] 
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speci tying Sort Work tiles 


work files are specified in the SSORT Statement as shown in Figure 
2-3. . 


| | WKIAPELS] = 
REPLOUT 
Nuseaut ( |! 


WKDISK{(S] + 


(NBDV = n,DEVCLASS = device-class=name(,RKEPLIN}\ 
saneuiiaeman 
SIZE = nnn 


{ FILESTAT = juNcaT 
CAT 


{,CATALOG = n] 


RESIDENT 


,)DEVCLASS = dev-~class-name ) 


WORK: 
[,MEDIA = { ji 
media namel....}! 


A 


Figure 2-3. Work File Specification in SSORT 


File Descriptions Parameters 


external-file-name as this is a positional parameter, it must 
appear first in the parameter string. If the 
file is temnorary, the maximum length is 16 
characters. If permanent, its maximum length is 
44 characters. There is no default value. 


FILESTAT = TEMPRY siynifies that the file is temporary. 
If specified for an innut file, the file must 
nave been passed by a previous step. If 
specified for an output file, the file must be 
passed to a subsequent step. 
= UNCAT signifies that the file is permanent and 
not cataloged. 
= CAT signifies that the file is cataloged. 
= IN signifies that the file is an innut 
enclosure (SUBFILE must then be specified). 


CATALOG This is used to override the normal catalog 
search rules when several private cataloys have 
been specified in an SATTACH JCL statement. 
Normally a file is searched for in all the 
attached catalogs, starting from the first one 
specified in the SATTACH statement. However, 
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SHARE 


END 


FSN 


ABEND 


SUBFILE 


when the CATALOG = n option is used only the nth 
catalog specified in the SATTACH statement is 
searched. 


This specifies the sharing level requested for 
the file. The tynes of access made by SOR! or 
MERGE are as follows: 

Read for INFILE, INFILEn and COMFILE. 

Write for OUTFILE, PRTFILE and LOGFILE. 

= NORMAL allows any number of readers, or a 
Single writer and no concurrent readers. This is 
the default value. 

=QNEWRITE allows any number of readers and a 
single writer to operate on the file 
concurrently. 

= DIR only applies to libraries. Tne library may 
be assigned to any number of users’ however, 
subfile sharing is only allowed for input. 


specifies the disnosition of the file on 
completion of the step when it is normally 
terminated. 


= DNEASSIGN signifies that the file is not 
automatically made known to next step (defanlt 
value). 

= PASS signifies that the file should be passed 
to the next step. 

= UNLOAD siynifies that the file is deassigned 
and the tape unloaded (value reserved for tape 
files). 


This gives the file sequence number when the 
file is on a multifile tane. The file sequence 
number may oe | through 255. 

The number 255 indicates that the file seytence 
number is not known. In this case, if the file 
is to be input, the whole tane will be searched 
for the specified external file name. If the 
file is to be output, it will be written 
immediately after the end of the last file held 
on the tape. 

If a file sequence number less than 255 is 
specified, the following constraints apply: 

For inputs the file sequence number must refer 
to a file possessing the specified external file 
name. 

For output! the file sequence number of the last 
file held on the multifile tape must be one less 
than the file sequence number specified in the 
FSN option. 


This has the same meaning as END but applies to 
abnormal termination. 


member~name is the name of the member of a 


LABEL 


MOUNT 


FIRSTVOL 


LASTVOL 


RESIDENT 


DEVCLASS 


MEDIA 


FILEFORM 


library when the file description applies to a 
library member. 


specifies the volume label. It applies to all 
the volumes given in the MEDIA parameter (see 
below). 


= NATIVE. Label is native Level 64 format 

(default value). 

= NONE. Unlabelled tape file. 

H200. HFAS disk file. \ 

H200E80. File label is 

extended, size is 80 

Characters. 

= H200C80. File label is 
80 characters. 

= H200C120. File label is HFAS tape files. 
120 characters. 


= H2OONONE. Unlabelled 


tape file. 


gives the number of volumes to be mounted. The 
first nn volumes specified in MEDIA are to be 
mounted. The others are mounted as required. 
MOUNT is only meaningful for multivolume files. 
If not specified, then all volumes specified in 
MEDIA are mounted at the beginning of the step 
execution. (See also REPLIN below.) 


This specifies the volume sequence number of the 
first volume of the file to be read. The default 
value is one. The volume sequence number refers 
to the order of volumes in the volume list 
associated with the keyword MEDIA. 


This specifies the volume sequence number of the 
file to be read. The default value is the 
sequence number of the last volume existing in 
the file. ’ 


Specifies that the file resides on one (or more) 
disks volumes that are resident. 


Device class name and attributes. For example, 
MS/M350, MT/T9/D1600, or DH/H279. 


Lists media identifiers. If MEDIA is not 
specified then the media are all assigned the 
WORK attribute. 

= (WORK) signifies a Work volume. Should be used 
for output files only. 

= (media-name) gives the volume name of the 
volume~external-identifier. 


Specifies the access system, UFAS, BFAS or HFAS. 


WRCHECK 


ADDRFORM 


ERROPT (parameter 
of the file 
description) 


The Tollowing file organizations are suported by 
these access systems! 
BFAS Sequential (disk or tape) Indexed 
. sequential Direct 
HFAS. Sequential (disk or tape) Indexed 
sequential Random 
UFAS Sequential Indexed Relative 


DOS 360 files (input only) are processed as BFAS 
files. The only difference is that some 
parameters must be specified for a DOS 360 file 
(see File Specification Rules for BFAS, HFAS and 
UFAS below). The DOS 360 organizations sunported 
are Indexed Sequential (ISAM), Sequential (SAM - 
disk or tape) and Direct (DAM). 

Level 62 files (input only) are also processed 
as BFAS files. The Level 62 files (input only) 
are also processed as BFAS files. The Level 62 
organizations supported are Sequential and 
Direct. 


This is only used for BFAS disk output files. 
when this option is selected, each block written 
to the output file is re~read to check that it 
has been Correctly written. If the WRCHECK 
option is not selected, no read after write will 
be carried out. 


This keyword is used to specify the format of 
the input record disk addresses to be included 
in the output record. ADDRFORM is significant 
only when one of the ADDATA, ADDROUT or KEYADDR 
output record formats is selected. 

= TITRDD signifies that the address is to be 
stored in the form: 

Bytes | and 2! relative track number in the file 
(TT). 

Byte 3% block number on the track (R). 

Bytes 4 and 5: displacement within the block 
(DD). 

TTRDD is the default value. 

= LRRR signifies that the address is to be 
stored in the form: 

Bytes !, 2 and 3: Logical record number, that 
is, the serial number of the record within the 
file. 

Bytes 4 and 5: undefined value. 

LRRR is applicable to any file organization with 
fixed length records. 


This specifies the action to be taken in 

case of an I/0 error on the file. 

= RETCODE signifies that the SORT or MERGE 
should display the return code via SYSOUT and 
then terminate. This is the default value. 

= SKIP signifies that the block at which the 1/0 


2=10 


RECSIZE 


ITEMSIZE 
BLKSIZE 


RECFORM 


NBSN 


H2 OOFQRM 


TA 
TB 
TC 
TD 
TE 
FORMAT I 


FORMAT2 - Form 
FORMAT3 - Form 
FORMAT4 -— Form 


error occurred should be skinned and processing 
should continue witn the next block. 

= ABORT signifies that the SORT or MERGE should 
terminate immediately. 

= IGNORE signifies that the remainder of the 
block which has not been read should be padded 
with blanks and processing should continue with 
the incorrectly read block. This option should 
be used with care since invalid decimal data may 


a re ~~ ”~ min nae a om, - ; ee “~ ry 
be introduced, resulting in abortion of the SORT 
or MERGE. 


gives the size of a logical record in a UFAS or 
BFAS file. 

For fixed length records, nnnnn is the size, in 
bytes. 

For variable length records, nnnnn is the 
maximum size, in bytes, not including the record 
descriptor word (RDW). 


Same as RECSIZE, but for HFAS files. 


gives the size.of a block in UFAS or BFAS files. 
Fixed —- nnnnn is the size, in bytes, of the 
block not including block serial number. 
Variable - nnnnn is the maximum block size, in 
bytes, not including the block descriptor word. 


Specifies the logical record format for UFAS and 
BFAS files only. 
= FB - fixed length, blocked (default value). 


F - fixed length, unblocked. 


VB - Variable length, blocked. 


= V - Variable length, unblocked. 
= U - Undefined format. 


For UFAS and BFAS tape file only, indicates that 
the file has no block serial numbering. Default 
is the contrary. 


Indicates the format for HFAS magnetic tape 
files. 


~ Type 
- Type 
~ Type . 
- Type 
~ Type 
- Form 


AWNH—|-MNIOWD> 
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BAN 


BANCHAR 


PADCHAR 


SIZE (in output 
file description) 


EXPDATE 


DATABUF 


BPB 


REPLIN 


Indicates that the HFAS file uses banner 
characters 41 in octal. 


Indicates that the octal value given as nn is 
used as banner characters in the HFAS file. If 
neither BAN nor BANCHAR is specified, no 
bannering is assumed. 


allows the default value for the padding 
character to be overridden by the octal valte 
given in nn. Restricted to HFAS files. 


gives the number of cylinders to be allocated to 
the output: file described. Note that space 
allocation takes place when the files are 
opened, i.e., at the beginning of the last nass. 
If the amount of requested snace is not found on 
the specified disks, the sort process will be 
aborted at that time. (Should not be speci fied 
for HFAS files). 


Specifies the expiration date of the file. 


expiration-date may take 3 forms: 


nnn where nnn is the number of days the file 
must be retained, 


yy/ddd where yy is the year within the 
century, ddd is the day within the 
year, 


yy/mm/dd where vy is the vear within the 
century. mm the month of the year and 
dd the day of the month. 


Specifies the number of buffers to be used by 
the sort or merge when processing the file. The 
default value is 2, that is, double buffering, 
but single buffering may be required in order to 
minimize memory usage. 


This speci fies the number of blocks per buffer. 
That is, the number of blocks to be read at each 
physical access of the input file, or the number 
of blocks to be written at each physical access 
of the output file. The default value is 1 (the 
best value for normal SORT or MERGE 
applications). However, higher values may be 
used to improve performance when the working set 
is greater than 256K or when the blocks are very 
small. 


Used to indicate to the sort or merge that the 


volume(s) supporting the output file need not be 
mounted before the sort starts, and may use the 
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INFILE 


INFILEn ($SORT 
parameter, not 
SMERGE). 


COMFILE 


WKTAPE[S] 


NBDV 


DEVCLASS 
REPLIN 


REPLOUT 


device supporting the input file volume(s). This 
parameter may be used to minimize the device 
requirements of a sort. In case of multivolume 
input and output files, the MOUNT option must be 
Set equal to ! for both input and output file. 
If the input and output files are on tape, and a 
tape sort is executed, the speci fication of 
REPLIN in OUTFILE has no effect if either 
REPLIN, REPLOUT or USEOUT is used as a work tane 
option (see below). 


Specifying OUTFILE = (INFILE) allows the output 
to overwrite the input file. It must not be 
specified when there is file concatenation on 
input. 


The keywords INFILE |! through INFILE 8 

may be used to specify files that must 

be concatenated with INFILE. File concatenation 
requires that all input files have the same file 
format, file organization, record format, record 
size and block size. The INFILEn parameter nust 
appear immediately after the INFILE parameter 
and the values used for n must start at | and 
must be in sequence. 

For example: 


INFILE = ¢( ), INFILE | = ( ), INFILE 2 = ( ) is 
correct. 
INFILE = ( ), INFILE 2 = ( ), INFILE 3 = ( ) is 


incorrect. 


Specifies the location of the sort/merge DSL 
statements. Data format may be either SSF or 
SARF. 


= *input-~enclosure-name signifies that the DSL 
statements are in the named input enclosure. 


= (file) Defines the library member containing 
the DSL statements. 


Declares that the sorting media are magnetic 
tape volumes. 


Allows the number of devices required to support 
the sort work tapes to be specified inn. 
Minimum value. for n is 3, maximum is 6. 

Device class name and attributes. 


A tape device used to support the reading of the 
input file is to be later used for one of the 


sort work tapes. 


A tape device used for one of the sort work 
tapes is to be later used to support the writing 
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USEQUT 


WKDISK(S] 


SIZE 
(in work file 
description) 


WORK 


REPORT 


PRTFILE 


SIZE (S$SORT 
parameter, 
not file 
description) 


INVREC 


of the output file. 


The tape volume to be subsequently used for the 
output file is to be initially used as a sort 
work tape. 


Declares that the sorting media are disks. 

The work file can be either vermanent, in wnich 
case it must have been preallocated, or 
temporary, in which case the space speci fied 
Will be allocated when the file is opened. Ihe 
file will be formatted by the sort as needed. 


Indicates that the file is temporary, and 
specifies that nnn cylinders should be allocated 
on the volume specified in the MEDIA list. 


Indicates, for temporary files, that work media 
should be used. 


Specifies the type of report the user wishes to 
have supplied by the sort or merge. Unless 
PRIFILE (below) is specified, the report is 
written on SYSOUT (See Appendix B). 


AUDIT Causes diagnostic and process error 
information to be printed, and a 
statistical summary oT record 
processing. (Default value). 


PARAM Causes a list of parameters that are 
specific to the sort/merge to be 
printed, in addition to diagnostic and 
process error information. 


= ALL Combines AUDIT and PARAM 


NONE Limits the report to process 
in formation. 


Specifies a permanent SYSOUT file. The file must 
be a native one with LABEL = NATIVE or LABEL = 
NONE. For a permanent output file on tape, the 
following default values are supplied RECFORM = 
VB, RECSIZE = 264, BLKSIZE = 1072. 


Specifies the total memory requirements in units 
of K bytes allocated to the sort for the 
execution. This includes code, data and 
buffers. Tne default value is 53, but anv value 
may be specified up to a maximum of 512. (For 
processing large records, refer to Avpendix H.) 


Specifies the action to be taken by the sort if 


an invalid record is encountered in the input 
file, that is, a record whose length is smaller 
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ERROPT CINVREC 
parameter, not 
tile description) 


LOGPILE 


START 


HALT 


REPEAT 


tnan tne minimum needed to apply trie 
INCLUDE/OMI1 clauses, or the KEY and/or SUM 
and/or ARRANGE Clauses of the DSL commands. 


= ABORT (Nerault value) Sort process should 
terminate wnen an invalid record is found. 


= CONTINUE Sort process should continue. 


Indicates wnat is to be done with the invalid 
record. 


PRINTID The invalid record’s number relative 
to the start of the sort is printed in 
the renort. This is the default value, 
and is the only value valid for HFAS 
files. 


PRINT As for PRINTID, and a display on the 
report of the entire invalid record in 
hexadecimal and alphanumeric tormats. 


LOG The invalid record is written onto the 
file speci fied in LOGFILE. 


IGNORE No message is printed. 


Contains a description of a native output file 
onto which the invalid records are to be logged. 
As only ERROPT = PRINTID is allowed for HFAS 
files, this parameter must not be svnecified for 
HFAS file sort. 


Gives the record number with which sorting is to 
begin. Values from | to 2147483647 are 
acceptable. The default value is 1. 


Gives the record number with which sorting is to 
end. The same values are acceptable as for 
START. The default is end-of-file. 


The sort checkpoint capability is requested. The 
default is no checkpoint. 
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DUMP 


BUFFER 


Defines the printed output in case of abnormal 
termination. 


NO. (de fault) No dump is output. 


DATA Data segments are output. 


Normally, 30K bytes of memory are reserved for 
the input and outout buffers of a merge. 
Depending on the block sizes of the files, and 
the number of buffers per file, this may be too 
low or too high. The user can override the 
default value by specifying this parameter, with 
nnn equal to the number of units of K bytes 
required. The total merge memory requirement 
will be (12 + nnn) K bytes. The buffer 
requirement is calculated by adding together the 
products of the blocksize and the buffering 
factor of all the input files and the output 
file. 
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File Specification Rules for BFAS, HFAS and UFAS 


These rules are easy to understand if the reader bears in mind the 
normal Overriding rules mechanism. A file to be processed by the 
sort or the merge will be assigned and then opened. If the file 
already exists and has native labels, then there is no need to 


specify any additional parameters since the labels contain the 
information required for consistent file processing. 


On the otherhand, if the file is to be created or if the file to he 
processed in input has not self sufficient labels (e.g., unlabelled 
tape file, HFAS tape file, DOS 360-SAM files, DOS 360—DAM files) 
then some additional parameters must be specified in the file 

speci fication. 


The circumstances under which these parameters must be speci fied are 
described oelow. Parameters are either optional (0) or mandatory 
(m). Optional means tnat if the parameter value is not explicitly 
given in the JCL, the default value for this parameter is used. 
Mandatory means that a value must be given in JCL for the 
corresponding parameter since no default value is provided. 


Native and Compatible Organizations: BFAS, UFAS, DOS 360, Level 62 


DOS 360 and Level 62 supported organizations are processed as BFAS. 
However, DOS 360 and Level 62 labels are not always self sufficient 
and some parameters must sometimes be specified. DOS 360 and Level 
62 organizations are supported in input only. The parameters 
required for disk files are summarised in figure 2-4. 
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EXTRA PARAMETERS 
REQUIRED 


OPTIONAL 
OR 
MANDATORY 


FILE TYPE FILE ORGANIZATION 


PERMANENT BFAS 

or UFAS 
TEMPORARY DOS 360-ISAM 
DISK LEVEL 62 


INPUT 


DOS 360-SAM 
DOS 360-DAM 


FILEFORM 
RECFORM 
RECSIZE 
BLKSIZE 


PERMANENT 
DISK 
OUTPUT 


FILEFORM 
RECFORM 
RECSIZE 
BLKSIZE 


TEMPORARY 
DISK 
OUTPUT 


UFAS (*) FILEFORM 
RECFORM 


RECSIZE 


(*) A default value of 2048 bytes will be taken for CISIZE 


Figure 2-4. Parameters Required for Disk Files 


2-18 


The parameters required for tape files are summarized in figure 2-5. 


FILE TYPE 


PERMANENT 

OR 

TEMPORARY 

LABELLED DOS 360-SAM 
TAPE (Permanent file 
INPUT only) 

FILE 


Level 62 
(Permanent file 
only) 


UNLABELLED BFAS(*) 
TAPE UFAS 
INPUT 

PILE 


(PERMANENT 
OR 
TEMPORARY ) 
(LABELLED 
OR 
UNLABELLED) 
TAPE 
QUTPUT 
FILE 


FILE ORGANIZATION | EXTR 


A PARAMETERS 
REQUIRED 


FILEFORM 
RECFORM 
RECSIZE 
BLKSIZE 


FILEFORM 
NSSN 
RECrORM 
HECoa LZ 
BLURSIZE 


FILEFORM 
RECFORM 
RECSIZE 
BLKSIZE 


FILEFORM 
RECFORM 
NRSA 
RECSIZE 


BLAOALe 


OPTIONAL 
OR 
{MANDATORY | 


(*) Unlabelled tape files are always processed by GCOS Level 64 


assuming they do not have a block serial number. 


Figure 2-5. Parameters Required for Tape Files 
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Coexistence Organization: HFAS 


At JCL translation time, the detection of HFAS files is based on the 
LABEL value. That means that the FILEFORM = HFAS parameter becomes 
optional. In other words if an HFAS file is to be processed, then 
the absence of FILEFORM or the specification of FILEFORM = HFAS 
produce the same result. The parameters required for disk and tape 
files are summarized in figure 2-6. 


FILE TYPE EXTRA PARAMETERS REQUIRED MANDATORY 
OR OPTIONAL 
DISK INPUT 
or DISK 
QUTPUT FILE 


TAPE INPUT F ILEFORM () 
OR TAPE BAN or BANCHAR 0) 
QUTPUT FILE PADCHAR 
ITEMSIZE 
BLKSIZE 
H200FORM 


Figure 2-6. Parameters Required for Disk and Tape HFAS Files 


S$SORT and SMERGE Examples 


An input file named PAYLIST on tape volume TV24 with a record length 
of 200 bytes and a blocksize of 4000 bytes is to be sorted. The 
output file will also be on tape file name SPAYLIST, volume TV8@l. A 
smaller blocksize, 2000 bytes, will be employed on output. The 
installation has three tape drives, all with the same attributes, 
and the DSL commands for the sort are held as a source library 
member, SCPAY, in a RESIDENT source library names SQLLPY. The memory 
allocated to the sort is 50K bytes. 


$SORT INFILE=(PAYLIST, DEVCLASS=MT,MEDIA=TV24), 
QUTFILE=(SPAYLIST, EXPDATE=300, NEVCLASS=MT, 
MEDIA=TV81, RECSIZE=200,BLKSIZE=2000), 
SIZE=50, 
WKTAPE=(NBDV=3, DEVCLASS=MT, REPLIN,REPLOUT), 
COMFILE=(SQLLPY, SUBFILE=SCPAY) 3 


Since there are only three drives available the REPLIN and REPLOUT 
parameters are required. When the sort job step starts there will be 
two WORK tapes and the input tape, TV24, mounted. When the inort 
phase of the sort process is complete the volume TV24 will be 
replaced by a WORK volume and sorting will continue. For the sutout 
phase of the sort, one of the three WORK volumes will be replaced hy 
the volume TV8I and the output file SPAYLIST will be written. 


If the above sort was performed using the provided default dis work 
space then the statement would be: 


$SORT INFILE= (PAYLIST,DEVCLASS=MI,MEDIA=[V24), 
QUTFILE= (SPAYLIST,EXPDATE=300, DEVCLASS=MT, 
MEDIA=TV81, RECSIZE=200, BLKSIZE=2000), 
SIZE=50,COMFILE = (SQLLPY,SUBFILE=SCPAY) $ 


If the temvorary disk 


suas ws Ma 


f 
have the following form 


pit : 
ile space is used then the statement would 
2 


$SORT INFILE= (PAYLIST, DEVCLASS=MT,MEDIA=TV24), 
QUTFILE= (SPAYLIST,EXPDATE=300, DEVCLASS=MT, 
MEDIA=TV81, RECSIZE=200,BLKSIZE=2000), 
WKDISK= (SIZE=15,DEVCLASS=MS/M400, MEDIA=BDI4), 
COMFILE= (SQLLPY,SUBFILE=SCPAY) $ 


In this case the sort work space is a temporary field of 15 
cylinders on an MSU0400 disk volume named BDI4. The temporary file 
is named H_SRIWKD. 


If the file SPAYLIST is too large to be accomodated in the disk 
space available the user may wish to split the sort process into two 
parts and then subsequently merge the results to form the connlete 
sorted file. If the file contains 10000 records then a two-part sort 
and merge would be of the form? 


$ JOB LSPAY, USER= LX518,PROJECT=INTERS 
$SORT INFILE=(PAYLIST, DEVCLASS=MT,MEDIA=TV24), 
OUTFILE=(SPAYLIXA,DEVCLASS=MT, 
MEDIA=TVVV,RECSIZE=200, BLKSIZE=2000), 
SIZE=50,COMFILE=(SOLLPY,SUBFILE=SCPAY), 
HALT=50003 
$ SORT INFILE=(PAYLIST, DEVCLASS=MT,MEDIA=TV24), 
QUTFILE=(SPAYLIXB,DEVCLASS=MT, 
MEDIA=TVVB,RECSIZE=200, BLKSIZE=2000), 
SIZE=50,COMFILE=(SQLLPY,SUBFILE=SCPAY), 
START=5001 3 
SMERGE INFILEI=(SPAYLIXA,DEVCLASS=MT ,MEDIA=TVVV), 
INFILE2=(SPAYLIXB, DEVCLASS=MT,MEDIA=TVVB), 
OQUTFILE=(SPAYLIST,DEVCLASS=MT,MEDIA=IV8I, 
RECSIZE=200,BLKSIZE=2000), 
COMF TLE=*MERCAR3$ 
SINPUT MERCAR 3 


DSL statements 


SENDINPUT3 
SENDJOB3 


Note how the DSL statements for the merge are entered as an inout 
enclosure. The two-part operation is performed using as 
intermediates the files SPAYLIXA and SPAYLIXB, on tape volumes IVVV 
and TVVB. 
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File Specification Examples 


INFILE 
Sorting a UFAS or BFAS file 
- on resident disk : INFILE = (FILE)) 


- on a uSer disk pack : INFILE = (FILE2,DEVCLASS = MS/M400, 
MEDIA=DISK1) 


» on tape ? INFILE = (FILE3,DEVCLASS = MT/T9/DI600,MEDIA = TAPE!) 
Sorting a HFAS file 


- On Disk 8 INFILE = (FILE4,DEVCLASS = MS/M350, 
MEDIA = DISK2,LABEL = H200) 


» on TAPE t INFILE = (FILES,DEVCLASS = MT/T9/D800,MEDIA = TAPE2, 
LABEL = H200C80,ITEMSIZE = 90, 
BLKSIZE = 900,BAN,H200FORM = TB) 
- Sorting an Unlabelled tave file 
INFILE = (FILE6,DEVCLASS = MT/T7/D&00, 
MEDIA = TAPEI,LABEL = NONE, 
RECSIZE = 80,BLKSIZE = 8090) 
QUTFILE 
Sort output is UFAS or BFAS file 


- Preallocated file on disk 3 
QUTFILE = (FILE7,DEVCLASS = MS/M400,MEDIA=DISK3) 


» Temporary BFAS file on disk 
QUTFILE = (FILE8,DEVCLASS = MS/M300,MEDIA = DISK4, 
FILESTAT = TEMPRY, 
SIZE = 10,RECSIZE = 80, BLKSIZE = 400) 
- Temporary UFAS file on disk 
QUTFILE = (FILE9,DEVCLASS = MS/M400,MEDIA = DISK5, 
FILESTAT = TEMPRY, 
SIZE = 4,FILEFORM = UFAS,RECSIZE = 127,RECFORM = V) 
(Default CISIZE is 2048 bytes (2K)). 
- Permanent BFAS file on disk 
as for temporary BFAS file with the following differences? 


FILESTAT = UNCAT, CAT (or omitted) 
EXPDATE can be specified. 


« Permanent UFAS file on disk 


as for temoorary UFAS file witn the following differences: 


FILESTAT = UNCAT, CAT (or omitted) 
EXPDATE can be specified. 


- BFAS tape file 
QUTFILE = (FILEO,DEVCLASS = MT/T9/D800,MEDIA = TAPE4, 
enrages = 90,BLKSIZE = 270,EXPDATE = 78/12/31, 
: Unlabelled tape file 
Similar to unlabelled tape file in input 
« HFAS output file 


Similar to HFAS input files. 


SECTION III 
DATA SERVICES LANGUAGE FOR $SORT 


The $SORT Data Services Language (DSL) statements, presented via the 
JCL COMFILE parameter group, describe the record-level functions to 
be performed during process. These functions are based on the nature 
of the input data content and format. Since the KEYS statement is 
always mandatory, a COMFILE must be provided with every sort. 


sort DSL statements are interpreted according to punctuation or 
keyword analysis, not position. Tne command file should be thought 
of as a continuous stream of characters. If the statements are 
punched on cards, punching may be continued from one card to the 
next card, provided that puncning is continued starting from the 
first column on the continuation card. If a card is to begin witn a 
new parameter, the first column must contain a space to set it off 
from the preceding card. 


COMMAND FILE ORGANIZATION 


The DSL statements are organized into three paragraphs called 
FUNCTION, RECORD, and END. Of these, the FUNCTION paragraph is 
optional but, if supplied, must precede tne other two. FUNCTION 
paragraph parameters are used to select special processing options. 
The default conditions for these options are underlined in the texti 
if a single parameters is given, tne default option should be 
understood to be the reverse or absence of the associated function. 


The RECORD paragraph follows FUNCTION (if supplied) and contains a 
set of statements that provide the sort utility with information 
regarding the content and format of individual fields within the 
user’s records. A RECORD paragrapn is mandatory since it includes 
tne KEYS specification. 


Tne final paragraph in a sort parameter file consists simply of the 
parameter cND which terminates the file. 


Each paragraph heading can be followed by a colon. Within a 


paragraph, statements or parameters may appear in any order, and 
must be separated from one another by either blanks or commas. 
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Elements of a statement specification may be parentnesized at the 
user’s option to enhance readability or aid organization. Comments 
may be inserted to improve readability. A comment has the form /«* 
comment */. Neither of the character combinations /* or */ is 


allowed in the comment itself. Comments may appear anywhere a blank 
or a comma is allowed, and must be preceded and followed by one. 


FUNCTION PARAGRAPH 
The complete FUNCTION paragraph is shown below. 


FUNCTION: [DESCEND] 
COLLATE = { EBCDIC 
G100 
H200 
ASCII 
“hexadecimal-string’ 
OUTPUT = ) ADDATA 


ADDROUT 
bee = {none | 
FIFQ 
[DELETE] 
[SORTSIZE = number-of-records] 


Tne parameters in the FUNCTION paragraph are described in the 
following paragraphs. 


DESCEND 


DESCENDING SEQUENCE 


Unless otherwise specified, the sort process will output records in 
ascending order of the key valuess that is, a record whose key value 
is ! will appear before a record whose key value is 2, and 
alphabetic characters will appear in the order appropriate to their 
collating sequence. When DESCEND is specified, this order is 
reversed and records are sorted into a descending key value order. 
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COLLATE 


COLLATING SEQUENCE 


The COLLATE keyword allows the user to explicitly state which 
collating sequence is to be employed by the sort utility. There are 
four sequences available: 


EBCDIC : Extended Binary Coded seins Interchange Code 
(the standard Series 60 Level 64 code set) 

G100 2 Series 100 Code Set 

H2 00 : Series 200/0 Binary Collating Sequence 

ASCII s American National Standard Code for 


Information Interchanye 
“hexadecimal-string’ t privately defined collating sequence 


Figure 3-1! shows the circumstances under which each sequence may 
apply. 


HFAS input 
or output HFAS input and outnut 
UFAS Series 200/2000 
CIBCD or H8CD) 
EBCDIC 


G100 
H200 


ASCII 


“hexadecimal-string’ 


X : valid combination 
* 3 key fields must not overlap 


Figure 3-1. Collating Sequence Selection. 


If COLLATE is omitted then the default value chosen depends on the 
type of file being sorted. If the input file and the output file are 
both HFAS (ieee, Series 200/2000) then the default is H200. 
Otherwise the default is EBCDIC. 


Be oad 0) 


Option 
EBCDIC 


GI 00 


H2 00 


ASCII 


Effect 


This is the standard internal code of Series 60 
Level 64. The sequence can also be applied to 

a Series 200/0 file, in which case the 
resulting order is that in Table E-4 of 
Appendix E. 


This value should only be specified when the 
input file has been. translated from a Series !00 
environment to the GCOS Level 64 environment. 
This translation can be performed using the 
Series 100 File Translator. G!I00 causes the 
records to be sorted into the same order as 
would have occurred if the sort was per formed 

on a Series 100 system (Table E-2, Appendix £). 


The use of GI0O for translated files is not 
mandatory. If the following conditions apply: 


« keys do not contain special characters 
and 


« keys do not mix numeric and non-numeric 
characters in the same positions 


then GI00 is not necessary. The collating 
sequence EBCDIC is valid. The performance of 
sort is better using EBCDIC than any other 
collating sequence. 


This value is the default when the sort is 
applied to Series 200/0 file. It will cause 

the records to be sorted into the same order 

as would have occurred if the sort was performed 
on a Series 200/0 system (Table E~3, Appendix §—). 


Note also that H200 can be applied to native 
(EBCDIC) files. This allows the user to maintain 
the original Series 200/0 collating sequence 

for a file written in the standard native format 
and code set. The resulting order is that shown in 
Table E-4, Appendix E. 


This value specifies that the ASCII (American 
National Standard Code for Information Interchange) 
collating sequence be applied. This sequence is 
defined in Table E-5 of appendix E. This table shows 
the low-order to high-order sequence as it is 
applied to the complete range of EBCDIC hexadecimal 
values available for a character in Series 60 

Level 64. The ASCII collating sequence may only 

be applied to a GCOS (EBCDIC) standard file. 
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“hnexadecimal- To define a collating sequence other than the above, 

string’ tne hexadecimal representation of all the characters 
in the character set are entered in order, startins 
with the highest (that which should always win a 
comparison) and ending with the lowest (that which 
always loses). The number of elements im the 
character set, and hence the length of the 
hexadecimal string, is a function of the type of 
file. HFAS file : the data is assumed to he in 
Series 200/0 code. The collating sequence must 
include 64 characters, that is 128 hexadecima! 
digits. For example, the DSL command 


COLLATE = 711121314151 61 7181921 22232425262 72229 
32 333435 363 738390001 02030405069 70809 
QOAOBOCODOEOFIOLAIBICIDIEDF202A2R2C2N25 PF 
3031 3A3B3C3D3E 33F ” 


has the effect of collating alphabetic characters, 
ahead of numeric digits, ahead of other characters 
CAgB CocelyOgl ge once % 5 = pteesacege ds See Anpendiy 


Other files t tne data is assumed to be in EBCNIC 
code. The collating sequence must include 256 
characters, that is 512 hexadecimal digits. For 
example, if it is desired to sort with numeric 
higher than alpnabetics, (0123456 789ABC....), the 
DSL command would begin 


COLLATE = “FOFIF2F3....F9CIC2C3....7 


OUTPUT 


QUTPUT FILE CONTENT 


The OUTPUT keyword is used to specify the contents of the records 
output by the Sort program. Depending on the value given to the 
parameter, the output record may contain the entire input record 
content, or combinations of disk address, data and key fields. The 
four values of the parameter are given below. 


Option Effect 


DATA ‘The output record will consist only of data that 
appears in the corresponding input record. Either 
the entire record may appear or only those fields 
extrac~ ted from the record during the sort process 
(via the ARRANGE parameter). This is the only valid 
QUTPUT choice for HFAS. 


ADDATA The output record will consist of original input 
data as above but will also contain a prefix field 
Giving the original record’s disk address. 


ADDROUT The output record will contain no data at all but 
will contain the disk address of the original input 
record. 

KE YADDR The output. record will begin with a field giving the 


disk address of the original record. This will be 
followed by the contents. of the major and minor key 
fields of the corresponding input record. 


The format of the disk address is : TIRDD (TT - relative track 
numbers R — block number relative to the beginning of the tracks DN 


~- record displacement within block), or LRRR (logical record 


number). 


An example.of the output record formats for these options is given 


in Figure 3-2. 


Input record (at disk address TIRDD) 


Qutput record format for each option 


OUTPUT = DATA 
OUTPUT = ADDATA Rey? 


OUTPUT = ADDROUT [TTRDD 
QUTPUT = KEYADDR |TIRDD | Key! | Key2 


Figure 3-2. Sample Output Formats 


The DATA and ADDATA options are used when the user wants the output 
file to contain all or most of the original data. ADDROUT and 
KEYADDR are suitable for applications requiring an index of sorted 
records, or when there is a limitation on space available for the 
output file. ADDATA, ADDROUT and KEYADDR should not be used when 
concatenated files are specified for input. 
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When the address format is LRRR, bytes | to 3 of the output record 
contain the logical record number. The contents of bytes 4 and 5 are 
undefined. The options ADDATA, ADDROUT and KEYADDR are only valid 
when the input file is disk resident. Note that for ADDROUT and 
aera output to tape, the record length specified must be at least 
i8 bytes. 


DUPREC 


DUPLICATE KEY OCCURRENCES 


The DUPREC keyword specifies the action to be taken when two or more 
records have identical values for each of the key fields speci fied. 
The meaning of the two options is given below: 


Option Effect 
NONE All of the records with identical key fields are 


output in a random sequence. 


FIFO First-In-First-Out. The duplicate records are output 
in the order in which they occur in the input file. 


DELETE 


DUPLICATE RECORD DELETION 


The DELETE option specifies that all but one record of a set with 
identical key field values should be deleted. The choice of which of 
these records to retain for the output file is dependent on the 
setting of the DUPREC option. If the output file is in key sequence 
and DUPREC is NONE, one of the duplicate records will be selected 
randomly. If FIFO has been selected, the first record in will be the 
one retained. 


If in the RECORD paragraph, summation is specified then DELETE must 


not be specified in the FUNCTION paragraph since deletion is 
automatic with summation. 


SORTSIZE 


TEMPORARY STORAGE REQUIREMENTS -— PERFORMANCE IMPROVEMENT 


When insufficient secondary working storage has been assigned, the 
sort process cannot be completed. In order to ensure that there is 
sufficient storage space available, the user can give in the 
SORTSIZE keyword an estimate of the number of input records. 
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SORTSIZE should be set equal to a decimal number which is the user’s 
estimate of the number of input records. The Sort program uses this 
estimate to determine the amount .of working storage that will he 
required, and commences the sort process only if the required amount 
is available. Performance of the sort is improved if this estimate 
is close to the exact number. Overestimation is better than 
underestimation for performance optimization. 


EXAMPLE OF FUNCTION PARAGRAP!! 
Example |? 
FUNCTION® DUPREC = FIFO SORTSIZE=1 0250 
The sort output is to be ascending order. Records with 
identical key field values will appear on the output file in 
the same order as on the input file. The output file record 
will contain the same fields as the input record. 
Example 28 
FUNCTION: QOUTPUT=KEYADDR, DELETE, SORTSIZE=5320 
The FUNCTION paragraph above specifies that the output file, to 
be ordered in ascending key sequence, should contain only the 
key and the original disk address of each record. DUPREC=NONE 
has been chosen by default. Thus the DELETE parameter ensures 
that if two or more records are found to have the same key, 


only one.of them, selected at random, will be selected and its 
address written in the output file. 


RECORD PARAGRAPH 


The statements in the RECORD paragraph specify fields within the 
uSer’s input records which must be examined by the sort process 
during execution. They are shown in the format model below. 
RECORD: KEY(SJ= key~element [key-~element] ... 
INCLUDE = condition-elemt [AND condition-elemt]... 
(INCLUDE = condition-elemt [AND condition-elemt]...J... 
OMIT = condition~elemt [AND condition-elemt]... 
[OMIT = condition-elemt [AND condition-elemt]...]... 
{SUM = summelement [sum-element] ...] 


[ARRANGE = arrange~element [arrange-element]...] 
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KEY specifies one or more key fields whose values determine the sort 
order. 

INCLUDE and OMIT are mutually exclusive record selection statements 
specifying whether or not an input record is to be included in or 
omitted from the sort process on the basis of field contents. Both 
statements must not appear in the same paragraph. 

SUM specifies a field whose value is to be totaled for a series of 
records with identical key values. Tne sum of these values will be 
sorted in the record tnat will be retained for output. However, 
overflow during summation is not detected. 


ARRANGE permits the user to select certain fields from the input 
record for omission or placement in other positions. 


KEY [S] 


KEY FIELD SPECIFICATION 


Every sort process requires the specification of at least one key 
field. Up to 64 key fields may be specified by means of the KEYS 
statement. The maximum lenatn of a key field is 255 bytes. The 
format of the statement is as follows: 


KEY(S] = pos length [CdtypelfRV]... 


In the format, pos is the byte position of the first byte of tne key 
- field relative to the first data byte of the record, and length is 
tne length in bytes of tne key field. The numbering of data bytes in 
a record starts with byte 1. For example, the numbers 1,3 refer to 
the field consisting of the first three data bytes of a record. [hey 
can be separated by a comma or a space. The dtype entry is one of 
the data type keywords given in Table 3-1. When not specified, the 
default data type is CHAR. CHAR is the only type which may be 
applied to HFAS files. The RV parameter specifies that the contents 
of this particular key field should be ordered in the opposite 
sequence from that prevailing for the sort process as a whole. 


Table 3-1. Data~type Keywords 


Unsigned binary data (2- or 4-byte) 


Signed fixed binary data (2- or 4-byte) 


Character string (maximum 256 characters) 


Unpacked decimal data (maximum 3] decimal 
digits and sign) 


Packed decimal data (maximum 31 decimal 
digits and sign packed into 16 bytes). The 
length is given in bytes (maximum 15). 
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EXAMPLE OF THE KEYS STATEMENT 

Tne example below shows the use of the KEYS statement to declare two 
fields in a user record as key fields for sorting. The states of the 
file before and after sorting are also shown. 


Examples 


RECORD: KEYS = 4,1,5,1 


Input File Qutput Flle 

Record Fields Record Fields Key Field 

A BC D&E A BC ODE Values 
rect GD Tx]x]9] vece (APR IRT «4 
eec2 [2] x] ¥] 6] tees x 
recs [6] [x] x] 5] kee? [@]3] x] x] 6 XK 6 
Rec4 rect [3]1| x] x]9| x 9 
ees [7[‘[x]v] 3] wees [7D [x]v[o 3 
reco [8 |2| x] x] 4] rece [7] 2] xly|o. Y6 
eee? (@]a]x]xfo] vece [e]s]x[zp x 


The file consists of seven records, labeled Recl to Rec? for the 
purpose of the example. Each record is five bytes long and contains 
five I-byte fields. The KEYS statement declares fields 4 and 5, in 
that order as the sorting key fields. The output file is ordered as 
if the Sort proaram has sorted the records according to the content 
of field 4, and then for a oiven value of field 4 further sorted the 
records on the basis of the content of field 5, wherever necessary. 


INCLUDE /OMIT 


RECORD SELECTION CRITERIA 


The INCLUDE and OMIT statements establish record selection criteria 
for the sort process by testing fields in the input record. To test 
a value the user writes up to 16 condition elements, a combination 
of operators and operands, which yield a value of TRUE or FALSE. The 
details of constructing condition elements are described below. If 
omitted, variable length records need not contain all key fields, 
but if included, must. 
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STATEMENT WITH ONE CONDITION ELEMENT=SAMPLE 1 


A sample INCLUDE parameter shown below contains one condition 
element. | 


INCLUDE=1, 1 EQ 2,1 /* FIRST BYTE = SECOND BYTE */ 


Here two fields are being compared to see if they are equal. Tne 
form for describing a field consists of a position digit indicating 
the byte of the record that is the beainning byte of the field 
followed by a lenath digit indicating the field length. In the 
example, the fields are one byte long and are bytes 1 and 2 of the 
record. The operator EQ indicates that the test is for equality. If 
bytes | and 2 are equal, the condition element yields the value TRUE 
and the record will be included in the sort. If the same condition 
element were used after an OMIT, yieldina the same value, the record 
would be omitted from the sort. 


STATEMENT WITH TWO CONDITION ELEMENTS-—SAMPLE 2 


A single INCLUDE or OMIT statement may contain more than one 
condition element, specifying several tests to be carried out. The 
parameter AND is used as a condition element separator, as shown 
below: 


OMIT = 1,1 EQ 2,1 AND 3,3 EQ 10,3 


When multiple condition elements separated by AND are present in a 
statement, records will be selected (for omission or inclusion as 
appropriate) only if all the condition elements yield a TRUE value. 
Thus in an OMIT statement, all condition elements being true would 
cause the record to be omitted. 


MULTIPLE INCLUDE OR OMIT STATEMENTS=-SAMPLE 3 


Alternatives for record selection can be established by using a 
sequence of INCLUDE statements or a sequence of OMIT statements. 
When a sequence of INCLUDE or OMIT statements occurs in a RECORD 
paragraph, the statements are processed in the order in which they 
appear. Processing of a sequence is terminated as soon as a complete 
statement is found to be TRUE’ the remaining statements in tne 
sequence are then ignored. 


The example below illustrates the analysis of multiple INCLUDE 
statements in the same paragraph? 


INCLUDE 


7) 


1,5 EQ 6,5 AND 1,1 EQ 10,1 
INCLUDE = 1,5 EQ 6,5 AND 1,1 NE 10,1 
The first INCLUDE statement performs two tests. First the 5-byte 


fields beginning at bytes | and 6, respectively, are compared. Let 
us assume they are equal. Byte ! is then compared to byte !0. If 
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they are equal, the conditions of the statement have all been met 
and the record is included; the second INCLUDE statement will be 
ignored, and will have no effect on the selection of the record. If 
bytes | and 10 are not equal, however, the second INCLUDE statement 
will be processed and will cause the record to be included in the 
sort process input record stream. 

The other tests that can be performed and expressed as condition 
elements are described in detail in the following subsections. 


CONDITION ELEMENTS 
A condition element consists of an expression that specifies a test 
to be made. Two types of expressions may appear in a condition 


elements 


1. A comparison operation which uses a comparison operator to 
compare the field value against another specified value; 


2. A numeric condition which tests the field for a positive, 
negative or zero value. 
Comparison Qperations 


A condition-element consisting of a comparison operator has one of 
the following forms: 


« Field Comparisons 
pos lenatn operator pos length [dtype] 
« Literal Comparisons 
pos length operator [dtype] “literal’ 
The field comparison compares one field with another. The literal 
comparison compares a field of a specific data type with a literal 
pan aunt is one of the comparison operators shown in Table 3-2. 
Table 3-2. Condition Element Comparison Operations 
equal to b 


not equal to 


; less than b 


less than or equal to b 


greater than b 


greater than or equal to b 
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Table 3-1 lists the allowable data types and their respective 
keywords. 


A literal operand is a character string delimited by apostrophes as 
shown in tne precedina format model. If tne apostrophe (%) is to be 
included as a cnaracter within a string literal, it must be 
duplicated. For example, tne literal ’can’’t’ specifies the string 
can’t. 


If a literal string of diaits is to be compared against a field with 
a numeric data type, then the literal is converted to the 
appropriate numeric data type usina, if necessary, right 
justification and leading zeros to equalize the length. If the 
literal is to be compared with a character field, the user must 
ensure that the length of the literal is equal to the length of the 
comparison field, by adding blanks as padding characters in the 
correct positions, if necessary. 


Sample condition elements using comparison operators are shown 
below. The numbers indicate the values in the field and not 
necessarily their internal representation. 


Input Record 


123K5 ABCDE EFGH 123K5678 ZXA 100 


Byte 1 14 15 23 25 26 28 
Condition Element Value 
4 2 EQ 18 2 TRUE 
1,1 GT 28 1 UDEC TRUE 
26 3GT | 3 UDEC FALSE 
1 1 NE 24 UDEC TRUE 
65 GT CHAR “ABCDD? TRUE 


Numeric Conditions 


A condition element consisting of a numeric condition expression 
has the following general form: 


pos length operator dtype 


Pos lenath are the same as for the comparison operations. The 
operator here is one of the three numeric condition operators shown 
below? . 
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Qperator Meaning 


POS Positive nonzero value 
_ NEG negative nonzero value 
ZERO Zero 


The allowable data types ares 


SBIN - Signed fixed binary data 

PDEC — Packed decimal data 

UDEC - Unpacked decimal data 
sample condition elements using numeric condition operators are 
snown below. Note that the field values are not the true internal 


numeric representations. Algebraic representations are used for 
illustrative purposes, 


Input Record 


By te 
Condition Element Value 
1,5 POS UDEC TRUE 
2 5 POS UDEC TRUE 
2 5 ZERO UDEC FALSE 
9,8 NEG UDEC TRUE 
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RECORD PARAGRAPH INCLUDE/OMIT EXAMPLE 


Input File 


Record Fields !. Include all records whose first 
huta te a fi 
sy wo ae 


i ed 


Re ey ee RECORD: INCLUDE=! 1 £Q ’G? 
Recl PCL aT) SK: Records selected: All but rec 4. 
Rec2 2. Omit all records whose first byte 
is not G. 
Rec3 Gi] Hi Id J 
Rae RECORD: OMIT=!1 1 NE ’%G7 


recs [FD] Ta 


= Records selected: All but rec 4. 


Rec5 G] I} F]FIF 3. Include all records whose first 
ES Eas al byte is G and whose second byte 
{s 1s . 
RECORD: INCLUDE=1 1 EQ %G% AND 2 
EQ “17, 


Records selected: Rec 5 


SUM 


Summation Field Specification 


The SUM statement is used to cause the values in one or more 
specified fields to summed for all the records of the same key. SUM 
is not valid for Series 200/2000 files. The fields to be summed are 
specified using pos lengths as shown in the model below. 


UDEC UDEC 
SUM = pos length PDEC; Jpos length jPDEC; |... 
(SBIN (SBIN 


The three data type keywords permit the user to specify the data 
type of the field. Up to 16 sum fields may be specified for a 
records fields must not overlap, and a key field or a part ofa key 
field must not be specified for summation. 


The SUM statement applies only to a group of records with identical 
key values. Its effect is to accumulate a total of data values for 
the specified sum fields throughout the group of duplicate keyed 


records and to store this total in the record which will be retained 


for output. Overflow is not detected. The selection of this record 
is governed by the setting of the DUPREC option. The DELETE 
parameter must not be specified in the same run as SUM since 
deletion.of duplicate keyed records is automatic. 


fat) 


l 


Other restrictions on the selection of sum fields are that the field 
must be one that will appear on the output record (that is, SUM is 
incompatible with the ADDROUT and KEYADDR options)’ and that every 
sum field must appear as an arrange element in an ARRANGE statement 
if the ARRANGE option is selected (see next subsection). Within this 
context, the sum field must be specified exactly as it was 
initially’ it may appear within the boundaries of a larger field but 
sum fields must not overlap. A portion of a sum field must not be 
specified as an ARRANGE element. If a sum field is duplicated in the 
output record by the ARRANGE facility, then summation occurs only 
for the first occurrence of that field in the output record. The 
remaining occurrences of that field will have an indeterminate 
value. 


EXAMPLE OF SUM STATEMENT 


Three record values are summed into one record for output. The 
original file and key fields are shown first and then the 
sorted file, first without summation and deletion and then as 
{t would actually be output. 


Input file 

Record Fields 

A B C D Key Field Values 
Rec! | 3] 1 | x | 9 | X 9 
Rec2 | 7] 2 | x [6 | X 6 
Rec3 | 6| 1 | x [5 X 5 
Rec4 | 2] 1 | xX [3 | X 3 
Recs | 4] 1 | x | 3 | X 3 
reco | 2] 1 | x | 8 | X 8 
Rec7 Rime eace X 3 

RECORD: KEYS = 31 41 

SUM = | 1 UDEC 
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sorted File Qutput File 


Record Fields Record Fields 

A B Cc D A B C D 
reca [2 [1 [ x{ 3. reca [9 [1 | x | 3_ 
we raekaks| ae rarerars 
rec? [3 [1 [x] 3) rec2 [7 | 2 [x [6 | 
ree3 [6 [1 [x][ 5) Rec6 [2 | 1 | x [8 | 
rec2 {7 | 2] x] 6 rec2 [3 |' [x [9 | 
reco [2] 1 | x] 3 | 
rec! [3 | 1 | x] 9 | 


In the output file, field A of rec4 contains the summed values 
for the three occurrences of records with the identical key 
field values X and 3. 


NOTE: Field A in other records is unaffected. 


ARRANGE 


QUTPUT RECORD STRUCTURE SPECIFICATION 


The ARRANGE statement is used to define the structure of the output 
record if it is to be different from that of the input. record. The 
structure is defined by listing all the fields of the record in an 
arrange list, in the sequence in which they are to appear in the 
output record. Each field is defined in the list by means of its 
position and length in the input record, as shown belows 


ARRANGE = pos length [pos length]... 


The Sort program structures each output record to conform to the 
structure defined in the ARRANGE parameter, and then writes the 
record in the output file. Fields not specified in the parameter are 
dropped. Note that the pos length specification of each field refers 
to the position of the field in the input record: the position of 
the field in the output record is determined by the position of the 
(pos, length) entry in the arrange list.The maximum "length" of an 
arrange element is 256. 


The arrange list may contain a maximum of 128 pos length entries. A 
field may be repeated in the output record by repeating the 


corresponding entry at the appropriate positions in the arrange 
list. The limit of 128 on the number of entries includes all the 


repetitions, and also key fields, irrespective of whether or not the 
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key fields are included in the arrange list. Fields tnat nave hean 
defined as sum fields in the SUM parameter must appear in the 
arrange list, either in their entirety or as subfields of other 


fields. 
ADDATA. 


EXAMPLE OF AN ARRANGE STATEMENT 


Clearly, ARKANGE can be used only when OUTPUT is DATA or 


A RECORD paragrapn containing an ARRANGE statement is shown helow. 


Also shown are the 
RECORD! KEY = | 
INCLUDE 
ARRANGE 


RV 
2 | 
3,1 


EQ 
2,1 


uu— 


Input File 


Record Fields 


Rec3 Z 
Rec4 4 
Recd Pa 


sys 
1,] 


AND 


Field D nas been dropved entirely. 
original place, and fields A and C have heen rearranged. The 
records are ordered in descending sequence of values in field A, 
tne reverse of the default sequence. 


Examples of Record Paraaraphs 


example [8 


RECORD! INCLUDE 


K 
SUM 


O 4 EQ CHAR “MAIN?) AND 
9 5 CHAR), 
5 5 PDEC), 


SG 


input file and the output file. 


Ei aes Os Se bs 
Output File 
Record Fields 
C B A 
kecs 
Rec! 
woo Dry [1 


Field B has retained its 


(30 2 LT 32 2 SBIN) 
(15 3 PDEC RV) 
(50 4 SBIN) 


INCLUDE specifies that records to be included in the sort process 
must meet the following criterias 


« The cnaracter string MAIN must appear in bytes 40 through 43. 
« The fixed binary value in bytes 30 and 31 must be less tnan tne 
fixed binary value in bytes 32 and 33. 
KEY nominates the following fields: 


« Major key is an alphanumeric character string in bytes 10 
through 14. 


- Minor Key is a packed decimal value in bytes 15 through 17 


which is to be sorted in reverse order to the sequence 
specified for tne output file. 


SUM establisnes the following two summation fields: 


« Five-byte packed decimal field beginning in byte 25. 


- Four=-byte fixed binary field beginning at byte 50. 


Example 23 
RECORD: KEY = (8 2 SBIN RV) (15 5 CHAR) 
OMIT = (1 7 NEG PDEC) 
OMIT = (1 7 ZERO PDEC) 


The effects of the RECORD paragraph parameters shown above are as 
follows. | 


OMIT is specified twice, establisning two alternatives for record 


exclusion; first, if field 1,7 is negative, the record is excluded. 
Qtherwise, the second OMIT is processed and tf field |! 7 is zero, 


the field is excluded. If neither condition is true (that is, field 
1,/ is positive, the record is not excluded from the sort process. 


KEY establishes the following two key fields: 
- Major key is a signed fixed binary value in bytes 8 through 9 
to be sorted in reverse order from the order prevailing for tne 


sort as a whole. 


- Minor key is the 5-character field beginning at byte I5. 
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END PARAGRAPH 


The last item in a set of DSL statements must be the paragraphs 
END: 


Tnere are no parameters associated with it. 
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SECTION IV 


DATA SERVICES LANGUAGE FOR SMERGE 


As with the sort process, merge DSL statements are provided via the 
COMFILE JCL parameter group. They are organized into FUNCTION and 
RECORD paragraphs, and are terminated by the paragrapn END. The 
keywords and statement within these paragraphs are similar to those 
associated with Sort, although a different meaning will be attached 
to some keywords. 


The input to $MERGE consists of up to eight sequential files, all of 
which have identical file attributes such as record length, block 
length and record format. [he files must all have been ordered on 
the basis of an identical key field or set of key fields. One of 
these input files, specified by the INFILEI] parameter yroup in the 
SMERGE JCL statement, is treated during the merge process as the 
primary input filet all other input files will be referred to as 
secondary files in the following descrintion. The difference netween 
primary and secondary files will be explained later in this section. 


The output file produced by $MERGE is ordered in the same sequence 
(i.e., ascending or descending) based on the same set of key fields 
as the primary file. 


FUNCTION PARAGRAPH 


The FUNCTION paragraph describes overall characteristics of the 
merge process. All of its parameters are optional and the user may 
leave out the paragraph altogether if the associated default options 
serve his purpose. If present, the FUNCTION paragraph must precede 
the RECORD paragraph. 


The general form of a merge FUNCTION paragraph is shown below. 


EBCNIC 

FUNCTION: [DESCEND] (DELETE] (COLLATE = G1 00 iz 
H2 OO 
ASCII \ 
“hexadecimal-striny? | 


The parameters DESCEND, and COLLATE have the same meaning as in the 
SORT process’ DELETE is interpreted differently, as will be seen in 
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Table 4~1]. FUNCTION Paragraph Parameters for SMERGE 


Parameter Purpose 


DESCEND When present, declares that the input 
files are in descending order and that 
the output file will also be in 

descending order. 


DELETE When present, DELETE specifies that 
multiple occurrences of records 
having the same key field values will 
cause all but one of the records to be 


excluded from the output file. 


COLLATE Specfies the collating sequence to be ‘ised. 
The SMERGE collating sequence must he the 
same as that used in the preceding $SORT 
executions. For further details see the 


descrintion of COLLATE in Section III. 


RECORD PARAGRAPH 
The RECORD paragrapn for a merge process is the same as that for a 
sorts 
RECORD: KEY{S] = key-element [key-element] ... 
INCLUDE = condition-elemt [AND condition-elemt]... 
(INCLUDE = condition-elemt [AND condition-~elemt] ... ... 
OMIT = condition-elemt [AND condition-elemt]... 
(OMIT = condition-elemt [AND condition elemt]... ... 
(SUM = sum~element [sum-element]...] 
[AdRANGE = arrange-element [farrange-element] ...] 


The syntactic models and descrintions of the elements listed ahove 
have already been described in detail in Section III. 


The statements are interpreted laryelv as for the sort with some 
differences. 

KEYS is used to specity kev fields. Since it is assumed that the 
primary merge file is in the order desired for output, the key 
fields are used for reference wien merging. That 1s, a secondary 
merge file record with the key value 4 will he placed on the ontont 
file contiguous to the primary record, or set of records whose kev 
field value is A. Minor key fields are likewise used to merge 
Secondary records in the anpronriate nosition within the file. 
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INCLUDE and OMIT work exactly as for the sort but are applied to all 
tne input files. 


The SUM statement as applied to the merge is based the 
primary-file-first order fof precedence for retaining one of a group 
of records with the same key field values. Thus, the sum of the 
specified field will automatically be stored on the record which is 
to be retained. If a SUM statement is present then DELETE need not, 
and must not, be specified in an associated FUNCTION Paragraph. 


The ARRANGE statement works as for the sort with the same 
restrictions on sum fields. 


MERGE EXAMPLE 


RECORD: KEYS = (1 1) (2 1) 


END: 
INFILE1 INFILE2 Qutput File 
(primary File) 
Record Record Key 
Fields Fields Fields 


Al 2 A 2 | Al 2 A | 


Al 3 Al 3 


A 25 A 7 4 A 2 | 


B00 A 60 A25 


SI|EIE|E a 
re © 
oY) Qo 
~ O 
Wl Qan 
wo 
aw 
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APPENDIX A 
SORT WORK FILE SPACE 


Sort work file space may reside on disk, MSU03I0 or MSU0400/MSU0350, 
or may use magnetic tape volumes that meet the NATIVE volume format 
Standard and have been prepared using SVOLWORK,. 


DISK WORK FILE 


A disk work file may be permanent or temporary and must always be 
allocated by cylinder. 


If no work space information is coded in SSORT then a temporary file 
named SORTWORK, resident on the system disk will be used. The size 
of this file is 10 cylinders. 


CALCULATION OF DISK WORK FILE SIZE 


Sort Record Size 

The size of the record handled internally by the sort is signi ficant 
in determining the necessary size for a sort work file. Its value is 
dependent upon the sort processing options being used. 


Calculation of the sort record size for the various cases is as 
follows: 


Let the input record size be i bytes and the sort record size be s 
bytes. 


A-O] 


be. QOUTPUT = DALA, DUPREC = NONE 
No ARRANGE elements. 
s =i 
2. OUTPUT = DATA, DUPREC = FIFOP 
No ARRANGE elements. 
s = i+ 4 bytes 
3. QUTPUT = DATA, DUPREC = NONE 


ARRANGE present. 


ae All key fields are contained within the ARRANGE 
specification 


s = sum of the sizes of the ARRANGE fields. 
b. Some key fields are not present in the ARRANGE fields. 
s = sum of ARRANGE + sum of KEY fields not present in ARRANGE. 
For example, RECORD: KEYS = (10, 4, 30, 6) 
ARRANGE = (4, 5, 20, 3, 10, 4) 
s = (5 + 3 + 4) + (6) 
ARRANGE excluded KEY 
s5 = 18 
[If DUPREC = FIFO, add four bytes to the value of s. 
4. QUTPUT = ADDATA, DUPREC = NONE add 5 to the value of s obtained 


in step |,2 or 3. 


5. OUTPUT = ADDROUT or KEYADDR 
s = sum of KEY fields + 5 
IF DUPREC = FIFO, S = sum of KEY fields + 5 + 4 


For example, FUNCTION: OUTPUT = ADDROUT, DUPREC = NONE 
RECORD: KEYS = (10, 7, 19, 15, 80, 20) 


s= (7+ 15 + 20) + 5 = 47 
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CALCULATION OF NUMBER OF CYLINDERS 


MSU0310 
Use this table for RK to find the smallest entry fe) sucn that its 
value is greater than s (sort record size): 


R = (475, 971, 1457, 1963, 2955, 5931} 
Calculate b, where be is the integer part of e/s 


150 then e = 4% 


For example, 5 
b int (475 7 150) = 3 


If the remainder of e /s > |I/2sS, use the next higher entry to 
establish a new entry. 


250 

47P 

s = 1 with a remainder of 225 which is greater 
than (172) 250 


For example, s 
e 
e 


Nu fl 


3 


Use e = 971. Then b = int(971/250) 
Let t = number of blocks per track 
where t = int (5931/e) 


If size of input file is n records, then size of work file in 
cylinders is as follows? 


number of cylinders = n/(20*t*b) rounded up 


MSU0400/MSU0350 
Use this table for R to find the smallest entry (e) such that its 
Value is greater than s (sort record size): 

R= (47%, 971, 1963, 2459, 4939) 

Calculate b where b is the integer part of e /s 


For example, s = 150 then e = 475 
b = int (475 7 150) = 3 


If the remainder of e/s > 1/25, use the next nigher entry to 
establish a new value. 


Let t = number of blocks per track, where t = (9899/e) rounded 
down 


If the size of the inpout file is n records, then the size of the 
work file in cylinders is as follows: 


number of cylinders = n/(19*t*b) rounded up 


If REPEAT is specified then increase the comonuted size bv 20%. 


Example 1% MSU0310 
FUNCTION: QUTPUT = DATA, DUPREC = FIFO 
RECORDS: KEYS = (20, 7) 
ARRANGE = (1, 60 80, 50) 
END: 
Calculate ss 
s = 60 +50 +422 114 
Using the table R for MSUO3I0 select: 
e = 475 
Therefore b = e/s = 4 
The remainder of e/s is 19 which is less than (1/2)s, (=57). 
leucee it is not necessary to choose a higher value from 
Calculate t,. the number of blocks per track: 
t = int(593l/e) = int(5931747) = 12 
If the file is to contain 20000 records then 


number of MSU03!0 cylinders = 20000/(209*t*b) rounded up 


20000/20*!2*4) 


21) cylinders. 


Example 2% MSU0400 
FUNCTION? OUTPUT = KEYADDR 
RECORD: KEYS = 1,!00 150,90 200,100 
ENDs 
Calculate s? 
s = 100 + 90 + 100 #5 = 295 
Using the MSUO400 table for R selects 
e = 475 
Therefore b = e/s = | 
However the remainder 180 > (1/2) 295 so choose 
e = 97) » b= e/s = int(971/295)=3 
In this case, the remainder 86 < (1/2)295. 
Calculate t, the number of blocks per track: 
t = int(98997e) = int(9899/971) = 10 
If the file is to contain !5000 records then 


number of MSU0400 cylinders = 15000/(19*t*b) rounded un 


150007 (19*10*3) 


27 cylinders 


MAGNETIC TAPE wORKK SPACE 


When the work space for the sort is on magnetic tape the I/0 tape 
volumes must nave the attribute WORK. The volumes to be used snould 
be prepared using SVOLWORK. This utility is described in the manual] 
"GCOS Level 64 Data Management Utilities". 
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APPENDIX B 
SORT/MERGE REPORT 


The contents of the Sort Report which is delivered to SYSOUT is 
determined by the value assigned by the user to the REPORT keyword. 
Specifiable values are AUDIT, PARAM, ALL, or NONE. In the examples 
that follow it should be understood that the appearance of Sort 


Execution 


Diagnostics or Sort Parameter Diagnostics would terminate 


the report. 


REPORT = ALL 


kKkkKKK 


kkk kk SORT REPORT * kek kek 


SORT PARAMETER LISTING *%%xx 


RECORD: KEY = 1 10 CHR 


kk kkk 


kk kkk 


INPUT 


SUM = A 2 SBIN 
INCLUDE = 12 2 EA ’MA% 


SORT PARAMETER DIAGNOSTICS *xexx 


F 750028 SYNTAX ERROR ,INVALID DATA TYPE PARAMETER 
“KEY = | 10 CHR" | 


F 750023 SYNTAX ERROR , INVALID POSITION PARAMETER 
"SUM = A 2 SBIN" 


F 750008 SYNTAX ERROR, “END% MISSING 
SORT EXECUTION DIAGNOSTICS **%x* 

F 750524 QUTPUT FILE NOT ASSIGNED 
SORT AUDIT INFORMATION *%%xx 

FILE IS XXXXX 


QUTPUT FILE IS YYYYY 


TOTAL 
TOTAL 
TOTAL 
TOTAL 
TOTAL 
TOTAL 


kkkkKk 


NUMBER OF RECORD READ IS 4000 

NUMBER OF RECORDS OMITTED IS 1000 

NUMBER OF RECORDS DELETED BY SUM IS 100 
NUMBER OF DUPLICATE RECORDS DELETED IS 0 
NUMBER OF INVALID RECORD IS 0 

NUMBER OF RECORDS WRITTEN IS 2900 


END OF SORT REPORT ***** 
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REPORT = AUDIT (default) 
kkk SORT REPORT xX%%% 


wee SORT PARAMETER DIAGNOSTICS *xxex 


* * &* F 750028 SYNTAX ERROR, INVALID DATA TYPE PARAMETER 
"KEY = 1 10 CHR" 


* * * F 750023 SYNTAX ERROR, INVALID POSITION PARAMETER 
“SUM = A 2 SBIN®" 


* % * F 750008 SYNTAX ERROR, “END? MISSING 
wemKK SORT EXECUTION DIGNOSTICS xxix 
* * &# F 750524 QUTPUT FILE NOT ASSIGNED 


kkk SORT AUDIT INFORMATION *x%%% 


INPUT FILE IS XXxxX 
QUTPUT FILE IS YYYY 


TOTAL NUMBER OF RECORDS READ IS 4000 

TOTAL NUMBER OF RECORDS OMITTED IS 10000 
TOTAL NUMBER QF RECORDS DELETED BY SUM IS 100 
TOTAL NUMBER OF DUPLICATE RECORDS DELETED IS 0 
TOTAL NUMBER OF INVALID RECORDS IS O 

TOTAL NUMBER OF RECORDS WRITTEN IS 2900 


kkk END OF SORT REPORT *kx&% 


REPORT = PARAM 
kee SORT REPORT xxk%x 

we I SORT PARAMETER LISTING *&%%% 

RECORD: KEY = | 10 CHR 
SUM = A 2 SBIN 
INCLUDE = 12 2 EQ ’MA? 

wee SORT PARAMETER DIAGNOSTICS *%kex 

& % * F 70028 SYNTAX ERROR, INVALID DATA TYPE PARAMETER 
“KEY = 1 10 CHR" 


* * * F 750023 SYNTAX ERROR, INVALID POSITION PARAMETER 
“SUM = A 2 SBIN" 


* * * F 750008 SYNTAX ERROR, “’ENDY% MISSING 


wkeRK SORT EXECUTION DIAGNOSTICS *xx%xx 
* *& & F 750524 OUTPUT FILE NOT ASSIGNED 
wk k¢ex END OF SORT REPORT *x%%% 
REPORT = NONE 
week SORT REPORT x xxix 
week SORT EXECUTION DIAGNOSTICS *%%%% 
* % *& F 750524 QUTPUT FILE NOT ASSIGNED 
keke END OF SORT REPORT *ex%x 


The MERGE report has the same format as the SORT report, but the 
word SORT is replaced by the word MERGE in report headings. 
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APPENDIX C 


ERROR MESSAGES FOR SORT/MERGE 


The diaanostics which can appear in the JOR (Job Occurrence Report) 
are caused by syntax or inconsistency errors in statements $SORT, 
SMERGE, SSORTFMT and SSORTWORK. Most of the messages are self 
explanatory. With each message there is an associated error severity 
code - Fatal(F) or warning (W). If a Fatal error is encountered then 
execution is abandoned, 


Note also that after the expansion of an extended JCL statement, 
errors may later be found in the resulting basic JCL statements 
(such as SASSIGN). Tnese errors in basic JCL are described in the 
JCL Reference Manual. 


Sort and Merge set the status variable that can be tested withn 
appropriate JCL statements. The possible values are: 


SEVO s the function has been correctly executed. 


SEVI s the function has been correctly executed. However a 
warning is given to the user who should carefully 
examine the report. (e.g. ! an empty output file has 
been created. The situation is normal for sort if, for 
example, the input file was empty. But the specification 
of an empty input file may be the result of a user 
error). 


SEV3 t (Sort only). Tne function has not been completed, due to 
an I/0 error. If the REPEAT option was used, the 
function can be restarted (see Appendix I.) 


SEV4 : the function has not been completed, due to a user error 
or a system error whose origin cannot be precisely 
diagnosed. 


Table C-1 shows the messages that can result from errors in the 
SSORT JCL statement. 
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Table C-1l. ERROR MESSAGES FROM SSUORT JCL STATEMENT 


Text and explanation 


CONTRADICTORY VALUES IN LABEL AND FILEFORM PARAMETERS 


Verify both parameters. A HFAS fileform implies a 
H200 type label, a standard label implies a native 
fileform. 


CONTRADICTORY VALUES IN INFILE AND WKTAPE PARAMETERS 
Appears when REPLIN is requested in WKTAPE and the 
device class of the output file and work tapes are 
different. 

CONTRADICTORY VALUES IN QUTFILE AND WKTAPE PARAMETERS 


Appears wnen REPLOUT or USEOQUT is reauested in wKTAPE 
and the device class of the output file and work 
tapes are different. 


CONTRADICTORY VALUES IN HALT AND START PARAMETERS 


Verify botn values. Tne value given for HALT must be 
greater than or equal to the value given for START. 


CONTRADICTORY VALUES IN WKTAPE AND WKDISK PARAMETERS 
WKTAPE and WKDISK are mutually exclusive. 

CONTRADICTORY VALUES IN ABORT AND CONTINUE PARAMETERS 
In INVREC, ABORT and CONTINUE are mutually exclusive. 


ERROR IN QUTFILE PARAMETER$ ILLEGAL VALUE OF MEDIA IN 
CASE OF REPLIN 


When a disk sort is executed, then if the input file 
and the work file are on the same media tne REPLIN 
option is not allowed in QUTFILE because it would 
cause the work file to be dismounted before the end 
of sort. 


ERROR IN FILESTAT PARAMETER $ILLEGAL VALUE TEMPRY FOR 
H200 FILES 


Tne concept of temporary file does not exist for HFAs 
files. 
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Table C-!1 (cont.) ERROR MESSAGES FROM SSORT JCL STAT. MENT 


Error number 


106 
(cont. ) 


Text and explanation 


ERROR IN COMFILE PARAMETER $ILLEGAL VALUE 
INPUT-ENCLOSURE-NAME 


Verify the syntax of the input enclosure name. 


ERROR IN WKTAPE PARAMETER sILLEGAL VALUE DEVCLASS TYPE 
MUST BE MT 


ERROR IN WKTAPE PARAMETER S$ILLEGAL VALUE NBDV MUST BE > 
= 3 OR < = 6 


ERROR IN SIZE PARAMETERSILLEGAL VALUE MUST BE > = 22K 


ERROR IN MEMORY PARAMETERSTLLEGAL VALUE MUST LIE 
BETWEEN 8 AND 120K 


ERROR IN START PARAMETER ILLEGAL VALUE MUST LIE 
BETWEENE | AND 2 147 483 647 


ERROR IN HALT PARAMETER SILLEGAL VALUE MUST LIE BETWEEN 
1 AND 2 147 483 647 


ERROR IN BUFFER PARAMETERSILLEGAL VALUE MUST BE < OR = 
TO 32767 


ERROR IN INFILE PARAMETERS ILLEGAL VALUE REPLIN OR SIZE 


Neither REPLIN nor SIZE should appear in INFILE 
description. 


ERROR IN WKDISK PARAMETER $ILLEGAL VALUE 
FILESTAT,END,MOUNT or EXPDATE 


None of these parameters is allowed in WKDISK 


ERROR IN WKDISK PARAMETERS ILLEGAL VALUE LABEL OR SORT 
DEFINITION PAR. 


Neither LABEL nor sort-definition parameters should 
appear under WKDISK. The file used as work file has 
always native labels. 


ERROR IN WKDISK PARAMETERSILLEGAL VALUE SUBFILE 


SUBFILE is not a valid keyword in WKDISK description. 
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Table C=l. (cont.) ERROR MESSAGES FROM S$SURT JCL STATEMENT 


Error number|Text and explanation 


106 ERROR IN COMFILE PARAMETERSILLEGAL VALUE MOUNT OR 
(cont. ) EXPDATE 


Neither MOUNT nor EXPDATE are valid keywords for the 
COMFILE description. 


ERROR IN COMFILE PARAMETER $ILLEGAL VALUE LABEL OR 
MEDIANAME TABLE 


LABEL is not a valid keywork in COMFILE description. 
The library is assumed to be native. Tne library 
cannot be a multivolume file. 


ERROR IN COMFILE PARAMETER $ILLEGAL VALUE SORT 
DEFINITION FORBIDDEN 


Parameters of sort definition are not allowed for 
COMFILE which must be an already created library. 


ERROR IN PRTFILE PARAMETER 3ILLEGAL VALUE SORT 
DEFINITION PARAMETERS 


Tne PRTFILE is either created and tnere is no need to 
specify sort-definition parameters, or the PRIFILE is 
a tape file to be created by the Sort and default 
values will be used. 


ERROR IN ERROPT PARAMETER SILLEGAL VALUE ONLY PRINTID OR 
IGNORE FOR H200 FILES 


ERROR IN WKDISK PARAMETER 3ILLEGAL VALUE DATABUF,BPB OR 
REPLIN 


None of these keywords is allowed in WKDISK. 


ERROR IN COMFILE PARAMETERSILLEGAL VALUE DATABUF, BPB 
OR REPLIN 


None of these keywords is allowed in COMFILE. 


ERROR IN PRTFILE PARAMETER sILLEGAL VALUE 
DATABUF, BPB,REPLIN OR SIZE 


None of these keywords is allowed in PRIFILE. 


ERROR IN DATASUF PARAMETERS ILLEGAL VALUE MUST BE EQUAL 
TO | OR 2 
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Table C-1. (cont.) ERROR MESSAGES FROM $SORT JCL STATEMENT 


| Error nunber| Text and explanation 


ERROR IN BPB PARAMETERSTILLEGAL VALUE MUST BE GREATER OR 
EQUAL TO 1 


106 
(cont. ) 


ERROR IN LOGFILE PARAMETER sILLEGAL VALUE H200 FILE | 
FORBIDDEN | 


ERROR IN LOGFILE PARAMETERS] LLEGAL VALUE DATABUF,BPB OR 
REPLIN 


108 ERROR IN LABEL PARAMETER 
CONTRADICTORY VALUES IN INPUT AND OUTPUT FILES 


HFAS input must produce HFAS output, and HFAS output 
can only be obtained from HFAS input. 


ERROR IN DEVCLASS PARAMETER 
CONTRADICTORY VALUES IN INPUT AND OUTPUT FILES 


When REPLIN is used in QUTFILE, the input and output 
file must be of the same device class. 


CONTRADICTORY PARAMETERS RESIDENT, DEVCLASS 


When a resident volume is described, tne device class | 
should not be specified. 


11 MEDIA PARAMETER MAY APPEAR ONLY IF DEVCLASS EXPLICITLY 
GIVEN 


No default value is supplied for DEVCLASS. So wher 
the volume is not resident, DEVCLASS and MEDIA mu 
be specified together. 


[ 112 ERROR IN NOBSN PARAMETER & NOBSN MAY NOT APPEAR IN THE 
PRESENT CONTEXT OF DISK FILE 


NOBSN use is restricted to tape files. 


ERROR IN BANCHAR PARAMETER # BANCHAR MAY NOT APPEAR IN 
THE PRESENT CONTEXT OF DISK OR NON H200 TAPE FILE 


BANCHAR is meaningful only for HFAS tape files. 


ERROR IN H200FORM PARAMETER #* H200FORM MAY NOT APPEAR 
IN THE PRESENT CONTEXT OF DISK OR NON H200 TAPE FILE 


H200FORM is meaningful only for HFAS tapes files. 
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Table C-!.(cont.) ERROR MESSAGES FROM $SORT JCL STATEMENT 


Error number 


112 
(cont.) 


_ 


Text and explanation 


ERROR IN WKDISK PARAMETER 8 SIZE MAY NOT APPEAR IN THE 


PRESENT CONTE XT 
(EFN ALREADY DEFINED) 


external file name and SIZE are mutually exclusive in 


WKDISK 


ERROR IN COMFILE PARAMETER & DEVCLASS MAY NOT APPEAR IN 
THE PRESENT CONTEXT WITHOUT MEDIA 


ERROR IN WKTAPE PARAMETER 3 


USEOUT MAY NOT APPEAR IN 


THE PRESENT CONTEXT OF NON NATIVE OUTFILE 


USEOUT is restricted to native tapes. 


ERROR IN WKTAPE PARAMETER 2 


USEQUT MAY NOT APPEAR IN 


THE PRESENT CONTEXT OF REPLOUT 


USEQUT and REPLOUT are mutually exclusive. 


MANDATORY 
MANDATORY 
MANDATORY 
MANDATORY 
MANDATORY 
MANDATORY 
MANDATORY 
MANDATORY 
MANDATORY 


PARAMETER 
PARAMETER 
PARAMETER 
PARAMETER 
PARAMETER 
PARAMETER 
PARAMETER 
PARAMETER 
PARAMETER 


RECSIZE MISSING 
BLOCKSZ MISSING 
DEVCLASS MISSING 
SUBFILE MISSING 
H200FORM MISSING 
INFILE MISSING 
QUTFILE MISSING 
COMFILE MISSING 
EFN MISSING 


EFN stands for external file name 


MANDATORY PARAMETER LOGFILE MISSING 


CONTRADICTORY VALUES # MEMORY, BUFFER-SIZE,DATABUF,BPB 


(MEMORY,BUFFER) form a group of parameters exclusive 
from the group (SIZE,DATABUF,BPB). 
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Table C-2 snows the messages that can result from errors in the 
SMERGE JCL statement. 


Table C-2. ERROR MESSAGES FROM $MERGE JCL STATEMENT 


| Error nunber | Text and Explanation | 


id 


| 


106 


107 


[CONTRADICTORY VALUES IN LABEL AND FILEFORM PARAMETERS 
Verify botn parameters. A HFAS fileform implies a 

| H200 type label, a standard label implies a native 
fileform. 

CONTRADICTORY VALUES IN SIZE AND FILESTAT PARAMETERS 


}ERROR IN FILESTAT PARAMETERS ILLEGAL VALUE TEMPRY FOR 
H200 FILES 


The concept of temporary file does not exist for HFAS 
files. 


| 
— IN COMPILE PARAMETER 3ILLEGAL VALUE 
| INPUT-ENCLOSURE-NAME 


| Verify tne syntax of the input enclosure name. 


ERROR IN COMFILE PARAMETERSITLLEGAL VALUE OF MOUNT OR 
EXPDATE 


| Neither MOUNT not EXPDATE are allowed for COMFILE. 


ERROR IN COMFILE PARAMETERS ILLEGAL VALUE LABEL OR 
MEDIANAME TABLE 


LABEL is not a valid keyword in COMFILE description. 
Tne library is assumed to be native. The library 
cannot be a multivolume file. 


ERROR IN COMFILE PARAMETER 3ILLEGAL VALUE SORT 
DEFINITION FORBIDDEN 


Parameters of sort definition are not allowed for 
COMFILE which must be an already created library. 


ERROR IN PRTFILE PARAMETER sILLEGAL VALUE SORT 
DEFINITION FORBIDDEN 


The PRTFILE is either created and there is no need to 
specify sort-definition parameters, or the PRTIFILE is 


a tape file to be created by the sort and default 
values will be used. 
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Table C-2.(cont.) ERROR MESSAGES FROM SMERGE JCL STATEMENT 


| Error number [Text and explanation 


107 ERROR IN COMFILE PARAMETER sILLEGAL VALUE DATABUF,BPB OR 
(cont. ) SIZE 


None of these keywords is allowed in COMFILE. 


ERROR IN PRIFILE PARAMETER*ILLEGAL VALUE DATABUF,BPB OR 
SIZE 


None of these keywords is allowed in PRIFILE. 


ERROR IN DATABUF PARAMETER $ILLEGAL VALUE MUST BE EQUAL 
TO | OR 2 


ERROR IN BPB PARAMETERSILLEGAL VALUE MUST BE GREATER OR 
EQUAL TO | 


ERROR IN LABEL PARAMETER 
CONTRADICTORY VALUES IN INPUT AND QUTPUT FILES 


HFAS input must produce HFAS output. HFAS output can 
only be obtained from HFAS input. 


CONTRADICTORY PARAMETERS RESIDENT,DEVCLASS 


When a resident volume is described, the device class 
should not be specified. 


MEDIA PARAMETER MAY APPEAR ONLY IF DEVCLASS [i ggamepitl atl aciaclasaltslieatiesdiabcssaaile 
[i ggamepitl atl aciaclasaltslieatiesdiabcssaaile 


ERROR IN NOBSN PARAMETER & NOBSN MAY NOT APPEAR IN THE 
PRESENT CONTEXT OF DISK FILE 

NOBSN is meaningful only for tape files. 
ERROR IN BANCHAR PARAMETER &* BANCHAR MAY NOT APPEAR IN 
THE PRESENT CONTEXT OF DISK OR NON H200 TAPE FILE 


BANCHAR is meaningful only for HFAS tape files. 


ERROR IN H2OOFORM PARAMETER t H200FORM MAY NOT APPEAR 
IN THE PRESENT CONTEXT OF DISK OR NON H200 TAPE FILE 


H200FQRM is meaningful only for HFAS tape files. 


ERROR IN COMFILE PARAMETER 8: DEVCLASS MAY NOT APPEAR IN 
THE PRESENT CONTEXT WITHOUT MEDIA 


MANDATORY PARAMETER RECSIZE MANDATORY PARAMETER RECSIZE MISSING = 
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Table C-2. (cont.) ERROR MESSAGES FROM SMERGE JCL STATEMENT 


Text and Explanation 


MANDATORY PARAMETER SUBFILE 
MANDATORY PARAMETER H200FORM MISSING 
MANDATORY PARAMETER OUTFILE MISSING 
MANDATORY PARAMETER COMFILE MISSING 
ERROR IN INPUT FILEsILLEGAL VALUE SIZE 


The SIZE keyword cannot appear in an innut file 
description since the file already exists. 


ERROR MESSAGE FORMAT FOR SORT/MERGE UTILITY 
The error message format is as follows: 


x gr | YYY error message [return code] “secondary information" 
MERGE 


YYY is a 3-digit number associated with a given message. 
Error message - a phrase that describes the diagnosis or error. ror 
example: 


» KEYWORD INVALID IN RECORD 


Return code - a class of error messages which can be identified as 
beginning with the words SYSTEM ERROR ... occur when the return code 
from a primitive execution cannot be interpreted by the Sort/Merge 
program. Such error messages are followed by a hexadecimal character 
representation of the specific return code. 


Secondary information - secondary information, when suoplied 
provides data that allows the user to be more readily aware af the 
language element that has been analyzed as erroneous. There are, 
however, Situations where an error in a parameter string inhinits 
intelligent analysis of the string in the vicinity of that error. 
When this occurs, the secondary information may be a stringy at 
parameters that has not been analyzed. In addition some processing 
error messages are also supplemented by a secondary message. 


Examples 


RECORD INCD = 10 2 EQ 20 2 SBIN AND 20 4 EQ CHR 7ABCI? 


INCLUDE = 12 A EQ 40 3 PDEC AND 90 1 GT 1001 PDEC 
Error messages 


* * *& SORTO20 SYNTAX ERROR, INVALID KEYWORD 
"INCD = 10 2 EQ 20 2 SBIN AND 20 4 EQ CHAR 7ABCD7" 


* *& *& SORTOO24 SYNTAX ERROR, INVALID LENGTH PARAMETER 
"12 A EQ 40 3 PDEC™ 


Note that in the example the second condition-element of the 
INCLUDE= does not appear in the secondary information, since. the 
presence of the word AND allowed analysis to correctly interoret the 
parameters. Usually, secondary information will be terminated by an 
element that immediately precedes a key-word, a paragranh header or, 
in the case of tests such as INCLUDE, the next condition element. It 
can also be terminated by the last element of the parameter string. 
Table C-3 lists the DSL dianostic messayes, and explains the 
circumstances which give rise to their appearance. 


Table C-3. DSL DIAGNOSTICS 


YYY Text and Explanation 


SYNTAX ERROR, INITIAL PARAGRAPH HEADER MISSING 


Message issued when the first DSL word is not a valid 
paragraoh header. 


SYNTAX ERROR, “RECORD? PARAGRAPH MISSING 


Message issued when the mandatory RECORD naragranoh 
does not appear in the DSL statements. 


INVALID COLLATING SEQUENCE FOR HFAS FILE 


Message issued when the ASCII or GI00 collating 
sequence is requested for an HFAS file. If it is 
necessary to sort an HFAS file with a collating 
sequence which is neither EBCNIC nor H200, tie 
collating sequence required should be entered 1s a 
private one. 
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Table C-3 (cont.) DSL DIAGNOSTICS 


Text and Explanation 


SYNTAX ERROR,KEYWORD INVALID IN “FUNCTION? PARAGRAPH 


Message issued when an unexpected word appears in the 
UNCTION paragraph. Two cases are frequent: 


» A punch error was made (e.g. COLATE instead of 
COLLATE) 


- The RECORD paragraph definition was omitted. 
005 SYNTAX ERROR, KEYWORD INVALID IN RECORD’ PARAGRAPH 


Messages issued when an invalid word appears in the 
RECORD paragraph. Here invalid means either: 


« Unknown, for example KAYS was specified instead of 
KEYS, or 


- Contextually non-significant, e.g, KEYS = INCLUDE = 
The INCLUDE keyword is not valid in this context. 


007 SYNTAX ERROR, INVALID PARAGRAPH HEADER 


Message issued when an expected paragraph header is 
not found in the DSL file. 


008 SYNTAX ERROR,“END’ MISSING 


The DSL commdnds are not terminated by an END: which 
indicates the end of DSL specification. The DSL file 
should be corrected and the step re-submitted,. 


O12 SYNTAX ERROR,PARAMETERS FOLLOW “END? 
Characters other than blanks or comments are not 
allowed after the END: expression which marks the 
end of DSL specification. Verify the DSL subfile or 
input enclosure. 

020 SYNTAX ERROR, INVALID KEYWORD 


Message issued when a keyword appears at a place 
where it should not. 


FUNCTION: ASCII will produce such a message. 
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Table C-3 (cont.) DSL DIAGNOSTICS 


ee ¢ Text and Explanation 


020 SYNTAX ERROR,EQUAL MISSING 
(cont.) 
Message issued eacn time an expected equal sign is 

not found. 


QUTPUT ADDATA will produce such a message 


022 SYNTAX ERROR,INVALID PARAMETER 


message issued when an unexpected value is specified 
for a parameter which is not a self identifying 
value, i.e., a parameter with the form keyword = 


value. 
SORTSIZE = 16A will produce such a message. 
023 SYNTAX ERROR, INVALID POSITION PARAMETER 
Message issued when, in eitner KEYS, SUM, ARRANGE, 
INCLUDE or OMIT, the starting position of a field is 


not an unsigned numeric. 


SUM = 1A 4 SBIN for example will produce such a 
message since 1A is not a numeric value. 


024 SYNTAX ERROR,INVALID LENGTH PARAMETER 
Message issued when, in either KEYS, SUM, ARRANGE, 


INCLUDE or OMIT, the length of a field is not an 
unsigned numeric or is equal to 0. 


ARRANGE = 12 2C will produce sucn a message since 
2C is not a numeric value. 


025 SYNTAX ERROR, INVALID OPERATOR 
Self explanatory. 
026 SYNTAX ERROR,7%AND% MISSING 
Diagnosed in an INCLUDE or OMIT clause when two 
condition elements are not related by an AND 
operator. 


O27 SYNTAX ERROR, 7 INCLUDE?%/7QOMIT? 


Messaae issued when the syntax of an INCLUDE or OMIT 
clause is not understandable. 


C=t2 


YYY 


028 


029 


038 


039 


040 


042 


051 


Table C-3 (cont.) DSL DIAGNOSTICS 


Text and Explanation | 


SYNTAX ERROR, INVALID DATATYPE PARAMETER 


Self explanatory. 


i 
4 
I 
3 
i 


SYNTAX ERROR, INVALID LITERAL PARAMETER 


Message issued when a literal parameter has not tne 
expected value, i.e., has either an invalid length 
(too long or too short) or is not in the desired 
format (i.e. non numeric when numeric implied by cata 
type, etc...). 


es 


“KEY? OVERLAP IN CASE OF A NON STANDARD COLLATING 
SEQUENCE 


Message produced when a forbidden case of overlapping 
keys is detected. Overlapping keys are not allowed 
for HFAS files when COLLATE is not equal to H200, for 
other organizations when COLLATE is not equal to 
EBCDIC. 


SYNTAX ERROR,“ KEY’ MISSING 


KEY is mandatory in SORT and MERGE. 


“SUM? OVERLAP 


Fields defined in the >UM clause are not allowed to | 
overlap. 


“SUM’ AND “KEY% OVERLAP 


No overlappina is allowed between fields used for 
summation and fields used for key comparison. 


Message issued when the fields specified in the 5UM 
clause are excluded from the output record by the 


ARRANGE clause. | 
a a a 
DUPLICATE KEYWORD ENTRY 


*SUM’ OMITTED IN “ARRANGE” 


Issued when the same keyword is encountered twice and 

duplication is not allowed. For examples 

FUNCTION * SORTSIZE = 10000 DESCEND OUTPUT = DATA 
DESCEND 
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Table C-3 (cont.) DSL DIAGNOSTICS 


YYY Text and Explanation 


058 INVALID COLLATING SEQUENCE LENGTH 
Issued when a private collating sequence is 
specified. For HFAS files, 64 positions must be 
specified, 256 for other organizations. 


070 PARAMS INCONSISTENT,DATA TYPE - LENGTH 


Where a data type can be specified, the field length 
must be compatible witn Level 64 data types (e.g. 
SBIN allows for a length of 2 or 4 only) 


O71 PARAMS INCONSISTENT,LITERAL=DATA TYPE 


In the INCLUDE or OMIT clauses, when a relational 

expression involves a literal and a data type, the 
literal and the data type must be consistent. For 

exampl ez 


INCLUDE = 1,4 GT SBIN IA is inconsistent since IA is 
not a signed binary value. 


073 PARAMS INCONSISTENT, LITERAL~LENGTH 
In the INCLUDE or OMIT clauses, when a relational 
expression involves a literal, the literal length 
must be consistent with the length of the field to 
which it is compared. 

076 PARAMS INCONSISTENT, “OUTPUTY - “SUM? 


Message issued when summation is requested along with 
an output record of the form KEYADDR or ADDROUT. 


O77 PARAMS INCONSISTENT, “OUTPUT 7—% ARRANGE? 


Message issued when output record arrangement is 
requested and the output record format is either 
KEYADDR or ADDROUT. 


078 PARAMS INCONSISTENT, 7SUM%-“DELETE?% 


Message issued when summation is requested alona with 
duplicate record deletion. 


080 TOTAL NUMBER OF CONDITIONALS GT 16 


No more than 16 condition elements are allowed in 
INCLUDE/OMIT. 
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Table C-3 (cont.) DSL DIAGNOSTICS 


YYY Text and Explanation 


TOTAL LITERAL LENGTH GT 512 


The total number of literal characters used in 
INCLUDE/OMIT must not exceed 512. 


082 TOTAL NUMBER OF “KEY? FIELDS GT 64 


The total number of key fields specified for record 
ordering must not exceed 64, 


TOTAL NUMBER OF “SUM? FIELDS GT 16 


The total number of fields specified in the SUM 
clause must not exceed 16. 
084 TOTAL NUMBER OF “ARRANGE’ FIELDS GT 128 
The total number of fields specifiea in the ARRANGE 
clause must not exceed 128. 


200 TOTAL NUMBER OF PARAMETER CHARACTERS GT 4500 


The total number of significant characters in the 
input exclosure must not exceed 4500 (several 

contiguous spaces are counted as one character). This 
limit can be increased on request. (The characters in 
comments are considered significant). 


500 SYSTEM ERROR -— INPUT FILE 


This message is followed by a secondary message 
giving the system return code which caused the 
message to be issued and an internal sort identifier 
for debugging purposes. The system return code will 
have been set by open or retrieve file definition 
functions. 


501 I/Q ERROR - INPUT FILE 


This message is output when a read record on the 
input file is not successful. It is followed by a 
secondary message that has the same format as for 
message 500. 


502 SYSTEM ERROR - ON CLOSE INPUT FILE 


Wrong termination of the close function for the input 
file. The secondary message that follows has the same 
format as for message 500. 
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ee 4 


503 


Table C-3 (cont.) DSL DIAGNOSTICS 


Text and Explanation 


SYSTEM ERROR — OUTPUT FILE 


system return code which caused the message to be 
output. Tne return code will have been set by open 
or retrieve file definition functions. 


Message followed by a secondary message giving the | 


T/7Q ERROR ~ OUTPUT FILE 


An error occurred while writing a record onto the 
output file. The secondary message that follows has 


505 


506 


the same format as for message 503. 


SYSTEM ERROR ~ ON CLOSE OUTPUT FILE 
An error occurred while closing the output file. The 
secondary message that follows has the same format as 
for message 503. 

SYSTEM ERROR - WORK FILE 


Message followed by a secondary message which may 
have the same format as for message 500 or 503. 


T7Q ERROR - WORK FILE 

Same secondary messaae as for message 500 or 503. 
SYSTEM ERROR ~ ON WRITE WORK FILE 

Same secondary message as for message 500 or 503. 


SYSTEM ERROR = ON CLOSE WORK FILE 


Same secondary message as for message 500 or 503. 


INVALID RECORD FORMAT FOR INPUT FILE 


SORT and MERGE accept F, FB, V, or VB record formats. 
In case of MERGE, this message can be output when one 
of the merged files has not the same record format as 
the master file. 
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Table C-3 (cont.) DSL DIAGNOSTICS 


YYY Text and Explanation 


This message is issued for SORT when the input record 
length exceeds the maximum record length. In the case 
of MERGE it is issued when variable length record 
files with different maximum record lengths are 
merged. 


INVALID FILE ORGANIZATION FOR INPUT FILE 


Message issued when the input file organization is 
not supported by SORT or MERGE. 


INVALID RECORD FORMAT FOR OUTPUT FILE 
Same as 510, but for output file. 
INVALID RECORD SIZE FOR OUTPUT FILE 
When record size has not been specified for a file 
which is not preallocated, this message will be 

output. 
INVALID FILE ORGANIZATION FOR OUTPUT FILE 
Same as 5!2 for the output file. 
QUTPUT FILE OVERFLOW 


Message issued when the end of output file is reached 
before all the sorted records have been written. 


INVALID DUMMY ASSIGN FOR INPUT FILE 


The assignment of a dummy file as input to the SORT 
and MERGE is considered as an error. 


EXTERNAL FILE NAME UNKNOWN FOR INPUT FILE 


The file name specified for the input file has not 
been found on the input media. The JCL should be 
checked, since either the file name or the media 
name, or both, are not correctly specified. 


Table C=-3 (cont.) DSL DIAGNOSTICS 


VVY Text and Explanation 


520 FIELD REFERENCED IN “INCLUDEY/“OMIT’% IS BEYOND INPUT 
RECORD LENGTH 


Qne or more fields specified in INCLUDE or OMIT DSL 
statements lie outside the record boundaries. [he MSL 
command file should be suitably amended and the step 
resubmitted. 


52] FIELD REFERENCED IN “ARRANGEY IS BEYOND INPUT RECORD 
LENGTH. 


Same as 520, but for ARRANGE. 


522 FIELD REFERENCED IN ’SUM% IS BEYOND INPUT RECOR® 
LENGTH. 


Same as 520, but for SUM. 


523 FIELD REFERENCED IN ’KEY’% IS BEYOND INPUT RECORD LENGTH 
Same as 520, but for KEY. 


525 INVALID DUMMY ASSIGNED FOR OUTPUT FILE 


The assignment of a dummy file as output of the ONT 
or MERGE is not allowed. 


526 EXTERNAL FILE NAME UNKNOWN FOR OUTPUT FILE 
Same as 519, but for output file. | 
528 INVALID DUMMY ASSIGN FOR SYSIN FILE 
A dummy file is not allowed for the command file. 
529 EXTERNAL FILE NAME UNKNOWN FOR SYSIN FILE 
Same as 519, but for the command file. 
530 INSUFFICIENT SIZE GIVEN 
The SORT cannot be performed with the working set 


specified. Increase this value and re-submit the 
step. 
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Table C-3 (cont.) DSL DIAGNOSTICS 


YYY Text and Explanations 


INSUFFICIENT WORK SPACE SPECIFIED 


The size of the disk work file is not suf 
perform the sort. See tne computation for 
Appendix A. 


SYSTEM ERROR - SYSIN FILE 


A secondary message follows which gives the system 
return code that caused the message to be output. Tne 
error may occur during the open of the command file. 


I/Q ERROR - SYSIN FILE 


Same secondary message as for 534. Message issued 
when a read record operation on the command file 
terminates abnormally. 

SYSTEM ERROR -— ON CLOSE SYSIN FILE 


Same secondary message as for message 534. The close 
operation on the command file has been unsuccessful. 


INVALID DUMMY ASSIGN FOR WORK FILE 


The assignment of a dummy file as sort disk work file 
is not allowed since the sort cannot be executed. 


EXTERNAL FILE NAME UNKNOWN FOR WORK FILE 
‘Same as 519, but for work file. 

SEQUENCE ERROR 
During the merging phase of the sort, a sequence 
error is found in a string. The error can be the 
result of a previous I[/0 error. The step can be 
re~submitted using another drive for the work file. 
If the error persists, refer to your supporting 
organi zation. 

WORK FILE OVERFLOW 


Same as message 532. 
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Table C-3 (cont.) DSL DIAGNOSTICS 


YYY Text and Explanation 


545 TOTAL NUMBER OF WORK FILE EXTENTS GT 16 


The sort disk work file cannot extend over more than 
16 extents. If such an error occurs, preallocate and 


format your disk work file again. 
547 EXTERNAL FILE NAME UNKNOWN FOR LOG FILE 


Same as 519, but for the file described under LOGFILE 
in the JCL. 


549 SYSTEM ERROK - ON WRITE LOG FILE 
Error when attempting to write a record onto the log 
file. A secondary message is displayed which shows 
the system return code that caused the message to be 
issued. 


550 INCONSISTENT DATA DATA LOSS 


Message issued when sort discovers, at the end of the 
output file creation, tnat the number of output 

records is less tnan the number of input records 

(after substracting the number of omitted records, 

the number of deleted records and tne number of 
invalid.records). If such a message is issued, please 
inform your supporting organization. 


55 | INCONSISTENT DATA DATA GAIN 


Same as 550, but when tne number of output records is 
aqreater than the number of input records. 


552 FIRST RECORD TO 8E PROCESSED IS BEYOND END OF FILE 


Check tne START parameter in the $SORT statement. The 
value given is too nigh. 


S53 END OF FILE REACHED BEFORE LAST RECORD TO BE PROCESSED 


farning message. Tne value given in HALT is too hign. 
Sort process will be performed normally and 
terminated with a SEVI status, i.e, all the records 
from the one specified in START up to the last one in 
tne file will be sorted. 


Table C=-3 (cont.) DSL DIAGNOSTICS 


YYY Text and Explanation 


555 


562 


563 


580 


SYSTEM ERROR - ON CLOSE LOG FILE 


The secondary message shows the system return code 
that caused the message to be printed. 


LOG FILE OVERFLOW | 


Physical end of log file has been reached before ail | 
the invalid record have been output. 
Specify a bigger file. 


SYSTEM ERROR ~ ON OPEN LOG FILE 


A secondary message shows the system return code that : 
caused the message to be printed. 


INVALID ERROPT KEYWORD FOR HFAS FILE 


Only ERROPT = PRINTID is allowed for HFAS file. 
Another specification will cause this message be 
printed. 


SYSTEM ERROR - ASSIGNMENT 


A secondary message shows the system return code that 
caused the assignment phase to terminate abnormally. 
In this case please inform your supporting 
organization. 


SYSTEM ERROR - PRESORT 
Same as 560, but for the internal sort phase. 


SYSTEM ERROR - MERGE/LAST PASS 


Same as 560, but for the external sort phase. 


SYSTEM ERROR - COLLATE 


Same as 560, but for the merging of files invoked 
through $MERGE 


SYSTEM ERROR - ON CHECKPOINT 


A secondary message shows the system return code 
given by the checkpoint function. Please inform your 
supporting organization. 
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Table C-3 (cont.) DSL DIAGNOSTICS 


Fee Text and Explanation 


SIZE VALUE IS TOO SMALL 
The value specified in the SIZE keyword of $SQORT (or 
the default value) is not sufficient. Refer to the 
SIZE parameter specification in Section II. 

SIZE VALUE IS TOO LARGE 


Same as 581, but in this case a SIZE value that is 
too high was specified. 


WORK FILE ILLEGAL DEVCLASS 


The file specified to tne sort as disk work file, 
does not reside on a supported device class. 


“Same as 522 
SYNTAX ERROR, KEYWORD INVALID FOR HFAS FILE 
A secondary message shows the invalid keyword. 
SYNTAX ERROR,PARAMETER INVALID FOR HFAS FILE 
A secondary message shows the invalid parameter. 
SYNTAX ERROR,DATA TYPE INVALID FOR HFAS FILE 


A secondary message snows the wrong sentence. Only 
characters are valid data types for HFAS files. 


LITERAL-DATA TYPE INVALID IN “INCLUDE?/7OMITY FOR HFAS 
FILE 


A secondary message shows the wrong literal. Only 
characters are valid data types for HFAS files. 


SYNTAX ERROR,OPERATOR INVALID FOR HFAS FILE 


A secondary message shows the invalid operator. (nly 
character string operations are allowed for HFAS 
files. 
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Table C=-3 (cont.) DSL DIAGNOSTICS 


IT/Q ERROR - ON READ WORK FILE 


A secondary message gives the external device name 
(e.g. MTO3 or MSU2) where the unrecoverable I/) error 
was detected and a four-digit hexadecimal code 
representing the abnormal I/70 completion code as 

returned by PIO. Such a message will be followed dy 
the sort abortion with a SEV3 status, thus enabling 
the operator to dismount the work volume and mount it 
on another drive and restart the step from the last 
checknoint.e For disk sorts the relevant track address 
is printed: ADDRESS: CYL/TRACK. 


I/Q ERROR - ON WRITE WORK FILE 
Same as 628, but for write operations. 
I/O ERROR -— WRITE T.M. WORK FILE 


Same as 628, but when attempting to write a tape mark 
onto a work tape during a tape sort. 


631 I/O ERROR - SKIP T.M. WORK FILE 
Same as 630, but when trying to skip to the next tape 
marke 
632 I7O ERROR - FORMAT WORK FILE 
Same as 628, but when attempting to format a track 
when a temporary file is used as sort disk work file. 
633 I/O ERROR -— SKIP TO BACK T.M. WORK FILE 


Same as 628, but when attempting to reposition a work 
tape after a restart. The operation of skip to tare 
mark and backspace is unsuccess ful. 


[70 ERROR - FORWARD SPACE BLOCK WORK FILE 


Same as 628, but when attempting to reposition a work 
tape after a restart. A forward space block commanc 
terminates abnormally. 
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In addition to those in lable C-3, certain other messayes may he 
issued in excentional circumstances. In this case, the organization 
supporting the installation should be informed. The messages 
concerned are listed below: 


O10 SYNTAX ERROR, KEYWORD INVALID IN “SORT? PARAGRAPH 
O11] SYNTAX ERROR, KEYWORD INVALID IN “MERGE% PARAGRAPH 
031 SYNTAX ERROR, “FILES’% MISSING 

517 INPUT FILE NOT ASSIGNED 

524 OUTPUT FILE NOT ASSIGNED 

527 SYSIN FILE NOT ASSIGNED 

531 INSUFFICIENT WORKTAPES SPECIFIED 

537 WORK FILE NOT ASSIGNED 

543 INVALID VOLUME OR DEVICE ASSIGNMENT FOR INPUT FILE 
544 INVALID VOLUME OR DEVICE ASSIGNMENT FOR OUTPUT FILE 
548 LOG FILE NOT ASSIGNED 


NARNINGS 
Warnings are given when the function reyuested by the user leads to 
a situation that SORT judges semi-normal. These cases are? 

« empty output files 


« invalid records have been detected 


» truncation may have occurred (maximum output record size is 
smaller than maximum input record size) 


- end of file has been reached before the HALT value (leads ter 
message number 553) 


SECONDARY MESSAGES 


Usually the secondary message appears in conjunction with a 
parameter error diagnostic’ however, excertions exist for nessayes 
261, and 562. See Table C-4. 


INVALID RECORDS 


For records haviny an invalid lenyth the following message is 


displayed: 
NVALID KECORD cause 2 record number 


Cause may be ILNCLUDE/OMIT or KEY/ARRANGE/SUM denending on the 
unsatisfied criteria. Record number is the record serial number 
maintained by SORT. SORT counts the records when readina the Inout 
file starting at | for the first record, 
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Table C-4. System Error Secondary Messayes. 


Secondary Messaye Text 


561,562 WRK DISK - READ 
561.562 WRK DISK - wRITE 
| 561,562 | WRK DISK - READ BUF | 

561,562 WRK DISK - WRITE BUF 
562 WRK TAPE - 2EAD 
561,562 WRK TAPE - WRITE 
561,562 WRK TAPE - WRITE TM 
561,562 WRK TAPE - SKIP TH 
561,562 WRK TAPE - WRITE ID 
562 WRK TAPE - READ ID 
562 WRK TAPE - READ BUF 
561,562 WRK TAPE - WRITE BUF 


READ SEMAPHORE LINK 
561,562 WRITE SEMAPHORE LINK 
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APPENDIX D 


DECLARING WORK SPACE WITH SSORTWORK 


The extended JCL statement SSORTWORK is placed inside the step 
enclosure of a job step, which invokes the SORT facility ina 
dynamic manner (for example, the SORT verb in COBOL). The purnose of 
SSORTWORK is to assign to the job step the required work file snace. 


As with S$SOKT, there are three different work space possibilities: 


1) TAPE BASED? a minimum of three and a maximum of six WORK tanes 
are specified. 


2) DISK BASED: a permanent or temporary disk file on one or more 
volumes is specified. If a temporary file is used then the size, 
in cylinders must be declared. This temporary file will always 
be given the name H_SRTWKD. 


3) If neither disk nor tape information appears in the SSORTWORK 
Statement, a temporary file of 10 cylinders on a resident volume 
is allocated, with the name H-SRTWKD. 


SSORTWORK WKTAPECS] =(NBDV=n, DEVCLASS=device-class-—name) 


WKDISKCS] 


aes 
( 


(SIZE = cylinders 


CAT 
[,FILESrAT = (UNCAT)] 


(,CATALOG = nj 


RESIDENT 
Le DEVCLASS= device-class-name ]) 
[.MEDIA =(\WORK 4] 
media-name Cy eee dy 


D-O1 


syntax 


The parameters and their values are as Jescribed in Section II or 
this manual. 


SSORTAWORK Example 


SJOB CLS, USER=PJIC PROTEC TELX2 8S 


SCOMM “THE NEXT STATEMENT EXECUTES THE COBOL 
COMPILER RESULTING IN THE TRANSLATION 
OF THe COBOL PROGRAM CONTAINED IN 
THe INPUT ENCLOSURE SAMPLESORT?% 3 


sC050L s0UKCE = *SAMPLESORE , XREF 3 


SCOMM “THe NeXT STATEMENT eXECUTES THE LINKER 
AHICH, USING THE RESULT OF THE COMPILATION, 
ALLL BUILD A LOAD MODULE NAMED SAMPLESORT 
AnD STORE IT IN A LIBRARY NAMED PLML? 3 


SLINKER SAMPLESORT, OUTLIB=(PLML,DEVCLASS=MS ,MEDIA=BN54) § 


SCOMM @Trr FOLLOWING STEP eNCLOSURE EXECUTES 
THe LOAD MODULE SAMPLESORT. SINCE THE PROGRAM 
SAMPLESORY USES THE SORT VERB, A SSORTWORK 
SLATEMENT IS REQUIRED WITHIN THE STEP. NOTE 
AioO THAT [WO SASSIGN STATEMENTS ARE PRESENT, 
Ow: WIiH INTERNAL FILE NAME SAMPLE, THE OTHER 
wlilt INTERNAL FILE NAME SORTOUT.% 3 


SSTEP SAMPLESORT, FILE=(PLML,DEVCLASS=MS, MEDIA=BDN54) 3 


SASSIGN SAMPLE, INVMAST, FILESTAT=UNCAT,DEVCLASS=*T, 
MENITA=1TV46 3 


SASOTON SOHTOUL,PAFILE,FILESTAT=UNCA1],DEVCLASS=MS, 
MEDI A=ED223 


SSURTHORK wKDISK =(PRISRTWK ,DEVCLASS=MS,MEDIA=BDI4) 3 
SENOSTEr 3 


SC OMM 4P4rnE NOW FOLLOWS THE INPUT ENCLOSURE SAMPLESORi 
netod CONTAINS THE COBOL SOURCE PROGRAM? — 3 


SENPOUT SAMPLeSORT , TYPe = COBOL 
PDeNTIEFICATION DIVISION. 


PROGKAM=1!1),  SAMPLESORT. 
ENVIRONMENL DIVISION. 


APPENDIX E 
COLLATING SEQUENCES 


Tne tables below show the collating sequences available with the 
sort utility. The tables show the characters in ascending order, 
from top to bottom, and left to right. They begin with the 
"low-value" and finish with the "high-value", 


Table E-| EBCDIC (Series 60 Level 64) Character Set 

Hexa- Graphic | H36 Hexa- Graphic H36 
decimal punch decimal punch 

low-val | 12-0-1-8-9 11-0- 1-8-9 

12-1-9 0-1-9 

1 2-2-9 0-2-9 

12-3-9 0-3-9 

12-4=-9 0-4-9 

12-5=-9 0-5-9 

12-6-9 0-6-9 

12-7-9 0-7-9 


12-8-9 


0-8-9 


l2-1-8-9 O- 1-8-9 
| 2-2-8-9 O- 2-8-9 
12-3-8-9 Q-3-8=9 
12-4-8-9 Q~4=-8=9 
12-5-8-9 0-5-8-9 
12-6-8-9 0-6-8-9 
12-7-8-9 0- 7-8-9 


l2-11-1-8-9 
11—1-9 
1-2-9 
11-3-9 
11-4-9 
11-5-9 
11-6-9 
11-7=+9 


12-1 1~0- 1-8-9 


11-8-9 
11-1-8-9 
11-2-8-9 
11-3-8-9 
11-4-8-9 
11-5-8-9 
11-6-8-9 
11-7-8-9 
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EBCDIC (series 60 Level 64) Character Set 


(cont). 


E=| 


Table 


H36 


Hexa- 


H36 


Grapnic 


iexa- 


Graphic 
puncn 


decimal 


punch 


decimal 
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EBCDIC (Series 60 Level 64) Character Set 


(cont). 


Table E=-1 


Graphic 


Hexa- 
decimal 


om 
cc] 
Ee 
4 
oO 
a 
xe) 


Hexa- 


E-03 


Hexa- 
decimal 


(oe) 
Cl 
Ce 
G3 
C4 
C5 
C6 
Ci 


C8 
C9 
CA 
CB 
CC 
CD 
CE 


CF 


DO 
DI 
D2 
D3 
D4 
D5 
D6 
D7 


D8 
D9 
DA 
DB 
DC 
DD 
DE 
DF 


Table 


— Onmnmodgeres 


E-I(cont). EBCDIC (Series 60 Level 64) Character Set 


Graphic H36 
punch 


12-0 
12-1 
12-2 
12-3 
12-4 
12-5 
12-6 
12-7 


12-8 

12-9 

12-0-2-3-9 
12-0-3-38-9 
12-0-4-8-9 
12-0-5-3-9 
12-0-6-3-9 
12-0- 7-8-9 


11-0 
bi-] 
ll-2 
11-3 
b1—4 
11-5 
11-6 
b1-7 


11-8 

11-9 

12-1 1-2-8-9 
12-11-3-8-9 
12-11-4-8-9 
12-11-5-8-9 
12-11-6-8-9 
12-11-7-8-9 


H36 
punch 


0-2-8 
11-0-1-9 
0-2 

0-3 

0-4 

0-5 

0-6 

0-7 


Hexa- Graphic 
decimal 
EO \ 


0-38 
0-9 
11-0-2-8-9 
11-0-3-8-9 
11-0-4-8-9 
11-0-5-8-9 
11-0-6-8-9 
11-0-7-8-9 


N< Ke Zz ec CHU. 


Oo & “SOAW b WM — © 
oO @ SAU BR GM — © 


12-1 1-0-2-8-9 
12-11-0-3-8-9 
12-1 1-0-4-8-9 
12-11-0-5-8-9 
12-11-0-6-8-9 
12-11-0-7-8-9 
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Table E-2 below shows the collating sequence for the Series i00 
character set. The "Hexadecimal" column gives the original internal 
value of the character in a Series 100 system. The rightmost column 
shows the hexadecimal value which the character has after 
translation into the Series 60 Level 64 environment. 


Table E-~2. Series 100 Character Set 


pre-translation | punch 
00 low-val 
40 8) @) 
41 1 H 
42 2 2 
43 3 3 
44 4 4 
45 5 5 
46 6 6 
47 7 7 
48 8 8 
49 9 9 
4A f 8~2 
4B # 8-3 
4c a 8-4 
4D z 8-5 
4E > 8-6 
4F ? 8-7 
50 space no punches{no punches 
51 A l2-] 12-1 
52 B 12-2 12-2 
53 Cc 12-3 12-3 
54 D 12-4 12-4 
55 E 12-5 12-5 
56 F 12-6 12—6 
57 G 12-7 12-7 
58 H 12-8 12-8 
59 I 12-9 12-9 
5A & 12 12 
5B e 12-8-3 1 2-8-3 
5C ] 12-6-4 1 1-8-2 
5D ( 12-8-5 12-85 
5E < 12~8-6 12-8-4 
5F \ 12-8-7 0-8-2 
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Table E=-2(cont). Series 100 Character Set 


Hexadecimal Graphic H14 H36 EBCDIC 
pre-translation punch punch 


SF 
DI 
D2 
D3 
D4 
D5 
D6 
D7 


J 
K 
L 
M 
N 
¢) 
P 
Q 
R 
$ 
* 
) 

; 
a 


N< we SF KCH ON + 


r= Til ee 
pete 


NOTE’ When two entries appear in the graphic column in Table E-2, 
the first graphic is the original series 100 character and the 
second is the graphic value after translation into EBCDIC. 
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Table E-3 below shows the effect of COLLATE#H200 on a Series 
200/2000 disk or tape file, Tne octal values are those which exist 
in a Series 200/0 system, 


Table E-3. H200 Collating Sequence for Series 200/0 Files 


| Graphic | Octal | Hex| ieraohie | Octal | Hex | 


0 ~ 40 20 
i J 41 2] 
2 K 42 22 |} 
3 L 43 7 ae 
4 M 44 24 | 
5 N 45 25 
6 0) 46 26 
7 P 47 2/l 
8 Q 50 28 
9 R 51 29 
‘ # 52 2A 
= $ 53 2B 
2 * 54 2c 
a * 55 2D 
> 56 2E 
& ! 57 2F 
+ < 60 30 
A / 61 3] 
B be) 62 32 
C T 63 33 
D U 64 34 
E V 65 35 
F W 66 36 
G X 67 37 
H Y 70 38 
I Z 71 39 
3 @ T2 3A 
° ‘ 73 3B 
) ( 74 3C 
% 715 3D 
716 3E 
? 77 3F 
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Table E-4 shows the effect of COLLATE = H200 on EBCDIC files. 
When two graphics are present (special characters), the first is the 


series 200 value and the second is the equivalent in Series 60 Level 
64. 


Table E-4. H200 Collating Sequence for EBCDIC Files 


‘| Graphic |Hexa- Graphic | Hexa- Graphic | Hexa- 
decimal decimal decimal 
FO Di OI 61 


0 A a J j 
| F J B b K k D2 92 S Ss E2 A2 
2 F2 Cc Cc i. at D3 93 T ¢t E3 A3 
3 D d M m Uieouu E4 A4 
4 E e Non Voeoev E5 Ad 
5 F f QQ o NW ow E6 A6 
6 G g P op X xX E7 Al 
7 H h Q q Y y E8 A8 
8 I i Ror ZL 2 AY 
9 # a 
a $ ‘ 
= * ( 
t AY] ; 

space as 
> ! 
& < 


+ 


Notet all other hexadecimal values have the same collating sequence 
value as hexadecimal 5F (graphic ). Double entries in the table such 
as “A a Cl 81", indicate tnat the values are equivalent for 
collating purposes. 
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Table E-5 shows the effect of COQLLATE=ASCII for an EBCDIC file, 


Table E-5. ASCII Collating Sequence 


Grapnic Hexa- Grapnic Hexa- Graphic Hexa- Graphic Hexa- 
decimal decimal decimal decimal 


bo + ew R POM He E-- 
CZEMAGHLOMNmMOoOT>G@| 
OF SRW TQ he ADT MH 


/ 
0 
| 
2 
3 
4 
5 
6 
7 
8 
9 
g 
; 
< 


we S NX &e BK CHY DOU 
pwn ANS & ES Cetn 4 AD 


wv fl 
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Table E-5(cont). ASCII Collating Sequence 


Graphic Hexa- Graphic Hexa- Graphic Hexa- Graphic He xa- 
decimal decimal decimal decimal 
28 49 BE CA 
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PERFORMANCE IMPROVEMENT 


The user wanting to get the best possible performance from a sort 
application should note the following: 


Using Checkpoint facilities has a significant impact on elapsed 
time. Performance degradation can be roughly evaluated hetween 
15% and 30%. 


File placement ! avoid placiny the input and output files on 
the same pack as the disk work files. 


Give the SORTSIZE narameter in the DSL. An exact value will 
produce a well tailored sort. In case of doubt it is better to 
supply a value that is too big than none. 


Sort performances are improved if more memory is sunplied for 
the execution, so the SIZE keyword is of prime importance. A 
default value of 53 K bytes is allocated if the keyword is 
absent from $SORT. The upper and lower values are explained 
hereunder: 


~ lower value # 22K + MAX (input file buffers, output file 
buffers) 


input file buffers = total size allocated for buffers to 
process the input file. If BP reoresents 
the input Tile block size then the 
total inout file huffers size is 
computed as? 

DATABUF * B * BPR 

If standard values for number of 
buffers and number of blocks per tuffer 
are used then the innut file buffers 


size iss 
2* B 
output file buffers = same comoutation as for input file 
buffers. 


F-O] 


For example * Suppose tne input andi outout files nave the sane 
block size of 4K. When using standard ontions for input and 
outnut file processing, tne mininum value for SIlZr is 30. It 
you use sinyle buffering for input and oautout, vou can rediice 
DALES Value, to 76. 


- upper value = 512 bvtes 


[The BLKSIZE keyword should be specified in the QUIFILE 
description when the output file and the innut file have not 
the same block size. The keyword sneci fication serves two 
purposes’ 


- if tne input block size is larger than the outnut block size, 
then performances will be better when specifyin, RBLKESIZE in 
the OUTFILE. 


~ if the output block size is laryar than the input block size, 
then if the BLKSIZE value is not snecified, SORT may exceed 
the speci fied working set. 


There is no need to specify this keyword if the innut rile and 
the outout file have the same block size. 


The REFORT option has an influence on ner formance. 


The selection of PARAMS or ALL will slightly degrade 
performance if the value of SIZE is hiyh, hut degradation can 
be more important for small working sets. PARAMS or ALL shold 
be used for debugging the sort aoplication. nce dehigged the 
AUDIT option (derault JCL value) provides annigh infernatior. 
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SORTING CARD FILES AND SUBFILES 


CARD FILES 


. The card file can be transferred to a sequential disk file, 
which can then be sorted in the normal manner 


« Tne SYSIN facility can be used 


- The cards can be directly input to the SORT. 


Using SYSIN 


The card deck to be sorted is placed between SINPUT and SENDINPUT 
cards. The JCL SSORT statement refers to the input file thus: 


eee gINFILE = (input-enclosure~name,FILESTAT = IN), ... 


This statement will produce a warning message at JCL translation 
time but no corrective action is necessary. The input enclosure will 
be written in SARF format. 


Using Direct Input 


The card deck to be sorted is prepared with a SEOS card at the end. 
In the $SORT statement, INFILE describes a card file, with RECSIZE 
and BLKSIZE (at least) specified. Records may be one per card 
(REFORM = F) or Several per card (RECFORM = FB). Blocksize should he 
either 80 or 51, depending on the type of cards used. The DEVCLASS 
keyword must specify a card reader (i.e. CD/R/CRBO/MB). 

51/MI 


Cards are read in SARF format and the punch code must he H36. (Since 
the cards are read in SARF format, command cards such as SHOL or 


SBIN are not allowed in the stream). At the beginning of the sort, a 
messaye is sent to the operator to mount the deck of cards named in 
the input-enclosure-name of INFILE on the card reader. 


The input-enclosure-name is purely for operator identification. SORT 
cannot check the identity of the deck. When the operator switches 
the card reader from standby to ready, the sort starts to read the 
cards, stopping at the $EOS card. 


Since blocks are very small (80 or 51) the reading speed can be 
increased by specifying BPB = 5 in the INFILE description. That will 
result in the reading of 5 cards at each I/0 operation. Usiny the 

de fault value of 2 for buffers (DATABUF keyword) will give a reading 
speed close to the maximum device speed. 


SUBFILE SORT 


The sorting of subfiles is treated in exactly the same way as 
sequential files (except that the SUBFILE keyword must be present), 
provided that the subfile is in SARF format. Sort always assumes 
that data input to it is in SARF format. Care must. be taken, since 
subfiles are yenerally library members, so? 


- a Special control record exists at the beginning of the sithfile 
- the data in the record is preceded by an SSF header of 8 bytes 


It is then recommended to first convert the subfile from SSF tn SARF 
before sorting it. 

Qtherwise the control record will be input to the sort (unless 
omitted by OMIT) and the other records processed with their SSF 
neaders. 


SORTING RECORDS OVER IK BYTES IN LENGTH 


The input records to the sort utility have the following size 
limitations: 


- When work files are on tapes, maximum record size is 160UU 
bytes. 


- When work files are on MSUO310, maximum record size is 7000 
bytes 


» When work files are on MSU0O350 or MSU0400, maximum record size 
is 13000 bytes. 


When sorting large records, care must be taken to supply SORT with 
sufficient memory. Insufficient memory allocation results in message 
number 581 being issued. The minimum value for SIZE given in Section 
II is 

22K + max (input buffers, output buffers). 


This is valid for records up to IK bytes. When the records are 
larger, the minimum value for SIZE in disk sorts is 


14 + 7 * RECSIZE + MAX(input buffers, output buffers). 
For example, a sort of records of 5K bytes ona file which has 4 
blocking factor of |, where double buffering is used on input and 
output requires a minimum value of 


14 + 7 + 10 = 59 K bytes for SIZE. 


Clearly, 59K will not yield the best performance for the sort. Dut 
it is adequate. 


For tape sorts, calculate the minimum value of SIZE as follows? 
14 + (NBDV + 4).%* RECSIZE + MAX(inout buffers, output burfers) 


where NBDV is the number of work tanes. 


APPENDIX I 
CHECKPOINT/RESTART IN SORT 


If the REPEAT keyword is specified in the $SORT JCL statement, the 
checkpoint mechanism is selected. This enables the SORT to he 
restarted after an abnormal termination from which recovery is 
possible (I/0 errors). When such an error is detected by the SORT, 
the process is aborted with a SEV3 status. (Sometimes, however, when 
reading the input file or writing the output file, sort may 
terminate with SEV4, even when the abnormal condition is an I/0 
error.) The following message is output on the operator console? 


AVI8 ddnn I/70 ERROR ON volume-name FOR ron 


The operator can then decide whether or not to change the device of 
the involved volume and restart the sort from the last checkooint. 


If the abnormal condition is a system crash, the sort process can 
also be restarted from the last checknoint. 


Note that no checkpoint is taken during the reading of the Inout 
file or the creation of the output file. 
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